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Preface 



This publication describes the job control 
language and the facilities available 
through its use. The purpose of the 
publication is to introduce you to the job 
control language. You should be familiar 
with the concepts and terminology 
introduced in the prerequisite publication. 

There are five major parts to this 
publication: 

• "Part I: Introduction to the Job 
Control Language" introduces the job 
control language and describes its 
relation to the operating system. For 
your convenience, this part reviews 
some of the concepts and terminology 
introduced in the prerequisite 
publication. 

• "Part II: Job Control Language 
Statements" includes a description of 
how to use each JCL statement. The 
first section in this part describes 
the format of the various JCL 
statements and the rules you must 
follow in coding them. 

• "Part III: JCL for Compiler, Linkage 
Editor, and Loader" contains a summary 
of the JCL statements used by these 
programs and examples of their use. 

• "Part IV: Cataloged and In- stream 
Procedures" describes how to use and 
write cataloged and in-stream 
procedures . 

• "Part V: Examples of Cataloged 
Procedures for Compilations, Link 
Edits, and Executions" Contains 
IBM-supplied cataloged procedures and 
examples of their use. 

There are four appendixes to the 
publication: 

Appendix A: Indexed Sequential Data 

Sets. 
Appendix B: Glossary of DCB 

Subp ar ameter s . 
Appendix C: Using the Restart 

Facilities. 
Appendix D: Summary of the DD 

statements. 

It is assumed that you can write 
programs using the assembler language or a 
higher level language such as ALGOL, COBOL, 
American National Standard COBOL (formerly 
US AS COBOL), FORTRAN or PL/I. Throughout 
this publication, these languages are used 



to illustrate the use of JCL in various 
applications. If you use another language, 
you can still use this publication to learn 
JCL and refer to the publications 
associated with the language you use for 
specific examples. 

The text relies heavily on examples to 
illustrate the facilities of JCL. To 
facilitate reading Part II of this manual,, 
all examples appear on shaded areas. The 
use of shaded areas allows you to skip the 
examples when you are reviewing the 
instructions, or to quickly find examples 
of how to code a given function. Parts 
III, IV, and V also contain many examples, 
but they are isolated in sections within 
each part and shading is not used. 



Prerequisite Publications : 

IBM System/360 Operating System: Concepts 
and Facilities , GC28-6535 

Suggested Readings : 

IBM System/360 Operating System: Data 
Management Services , GC26-3746 and 
Supervisor Services , GC26-6646 



Associated Publications : 

IBM System/3 60 Operating System: 

ALGOL Programmer's Guide , GC33-4000 

American National Standard COBOL 
Programmer's Guide . GC2 8-6399 

Assembler (E) Programmer's Guide , 
GC28-6595 

Assembler (F) Programmer's Guide , 
GC26-3756 

COBOL (E) Programmer's Guide , CG24-5029 

COBOL (F) Programmer's Guide . CG28-6380 

FORTRAN IV (E) Programmer's Guide , 
GC28-6603 

FORTRAN IV (G and H) Programmer's Guide , 
GC28-6817 

Linkage Editor and Loader , GC28-6538 

PL/I (F) Programmer's Guide , GC28-6594 

Tape Labels . GC28-6680 
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Summary of Major Changes 



Release 20.1 



The Release 20.1 changes listed below are described in this manual, 
in the text by a vertical line to the left of the change. 



They are indicated 



Item 



Description 



Support for 
2305-1,, 2305-2, 
2319, and 3330 



Support for 3211 



Removal of PCP 
information 



The 2305-1, 2305-2, 2319, and 3330 direct access 
| devices have been added to the section on the 
UNIT parameter. Z, a character coded in the 
sub parameter OPTCD of the DCB parameter, has an 
additional meaning when referring to input from 
| a direct access storage device. 

The 3211 printer has been added to the section 
on the UNIT parameter. FCB, a new parameter to 
be coded on the DD statement, allows you to 

| specify forms control information. The UCS 
parameter can also be coded for the 3211; 

| character set codes to be specified in the UCS 
parameter for the 3211 printer have also been 
added. 

|All references to the Primary Control Program 
| have been removed. All information in this 
[manual now applies to systems with MFT or MVT, 
| unless restrictions are specifically noted. 



I Areas Affected | 
. + j 



140,156,157, 
209,240,369, 
391,404. 



96,100, 
102-103,419 



H 



H 
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Release 20 



Item 



h 



l 

Dynamic Allocation 
Support for TSO 



ASCII Support 



Description 

All references to USASCII have been changed to 
ASCII. (American Standard Code for Information 
Interchange). In the DCB subparameter BLKSIZE, 
you can specify the minimum and maximum lengths 
for blocks of ASCII records on magnetic tape. D 
and DB can be specified as values for the RECFM 
subparameter of the DCB parameter; D means that 
the ASCII records are of variable length and DB 
means that the ASCII records are of variable 
length and that they are blocked. AL and AUL 
are new values for the LABEL parameter; AL 
specifies that the data set has American 
National Standard labels and ADL specifies that 
the data set has both American National standard 
labels and American National Standard user 
labels. 



-•» 



DYNAM, a new DD statement parameter, allows you 
to defer definition of a data set until you 
require it. 
j 

NOTIFY, a new JOB statement parameter, indicates 
to the system that you are requesting that a 
message be sent to your time sharing terminal 
when your background job completes. 



NOTIFY Parameter 



< 

NOPWREAD, a new subparameter of the LABEL 
parameter, specifies that a data set can be read 
without a password, but that the operator must 
give the password before the data set can be 
written in or deleted. 



NOPWREAD Subparameter 



*- 



H 



TERM Parameter 



TERM, a new DD statement parameter, allows you 
to identify a job as a time-sharing task. 



| _ 

155/165 

Model Dependency 



3210 and 3215 printer-keyboards have been added 
to the section on the UNIT parameter. 



Publication 
Improvement 
I 

Input/Output 
Recovery Management 
Support 



Pages 13-22 of the Release 19 version of the 
publication have been rewritten. 



-H 



The command SWAP has been deleted from the list 
of commands that can be coded on the command 
statement. 
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Release 19 



Item 


Description 

1 _ ; j 


r " i 
System Management 
Facilities Subset 1 


The TIME parameter on the JOB and EXEC state- 
ments now applies to MFT as well as MVT. 

L , „,. ,.,„. .„, , J 


System Management 
Facilities Subset 2 

Input /Out put 
Recovery Management 
Support 

Data Management 
Support for American 
National Standard 
COBOL 


The addition of the OUTLIM parameter on the 
DD statement that specifies SYSOUT to limit an 
output data set. 

A new command, SWAP, that allows Dynamic Device 
Reconfiguration of two volumes has been added. 

Two new values for BFTEK, DCB subparameter, have 
been added. A specifies record area buffering: 
R specifies record buffering.. 

[ i 

B, a new value for DCB subparameter OPTCD, 
requests that end-of-file recognition be 
disregarded for tapes. 


Recognition of 
EOF on Input 


ISAM Improvements 

Direct System 
Output Facility 

Seven-Track Tape 
Default of 800 BPI 


For ISAM, a newly created data set can now 
overlay an older one — reusing the space. The 
independent overflow area of an ISAM data set 
can now be on a different device type from the 
prime area. 

In MFT and MVT, an output data set can now 

be written directly to the desired unit record 

or magnetic tape device. 

The default for 7- track tape is now 800 
bits-per-inch. 

A data set that is not needed after restart can 
be defined by coding the DUMMY parameter. 


DD DUMMY Substitu- 
tion at Restart 


In-Stream Procedures 


A facility has been added that allows procedures 
to be included in the input stream of a job. 


Main Storage 
Hierarchy Support 
MVT Extension 

Blocksize Adjustment 
for Sysout Data Sets 


If you code the REGION parameter and request 
storage only from hierarchy 1, no hierarchy 
segment is allocated. 

If the BLKSIZE parameter for a SYSOUT data set 
is not an integral multiple of and larger than 
the logical record length, it is adjusted. 
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Part I: Introduction to the Job Control Language 



The IBM System/360 Operating System was designed to meet the many 
diverse needs of the computer user. Data processing needs differ 
greatly from one installation to another and between individual users 
within an installation. The purpose of the operating system is to aid 
you in getting your work done. It achieves its purpose by managing all 
available resources, including the central processing unit, main 
storage, input/output devices, and any programs that are a part of the 
system. To use the operating system, you must describe to the system 
the work you want done and the resources you will need. You provide the 
operating system with this information through use of the job control 
language ( JCL) . 

The job control language, commonly referred to as JCL, consists of 
nine control statements. On these control statements, you code 
information to be used by the operating system to direct the execution 
of the programs you have written. The programs you write are called 
source programs or source modules . A source program, the JCL statements 
needed to describe what the operating system is to do, and any related 
data are together considered a job . Every job submitted for execution 
by the operating system must include JCL statements. The design and 
coding of the JCl portion of your job can require a considerable amount 
of time. Sometimes JCL even requires debugging. 

The job control language is a very flexible language and with this 
flexibility come many optional features. You should become familiar 
enough with the language to be able to decide what information the 
operating system will need to process your job and which features of the 
language will aid you in getting your job done more efficiently. 



The IBM System/360 Operating System 

An IBM System/360 Operating System consists of a control program 
together with a number of optional processing programs such as language 
translators, utility programs, and a sort/merge program. The purpose of 
the control program is to efficiently schedule, initiate, and supervise 
the work performed by the computing system. The processing programs 
(see Table 1) are designed to help you program solutions to problems and 
design new applications. They do this by giving you a combination of 
programming aids, services, and precoded routines that you can use with 
the programming language of your choice. 



PROCESSING PROGRAMS AND JCL 

You can use the processing programs provided by IBM singly or in 
combination to process your job. The IBM processing programs available 
for your use can be supplemented by programs written by you or others at 
your installation. The IBM processing programs are classified as either 
language translators or service programs (see Table 1). 
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Table 1. Processing Programs 

| Processing Programs | 

± _ r , j 



Language Translators | Service Programs 



| ALGOL 

j Assembler 

J COBOL 

| FORTRAN 

I PL/I 

| RPG 



Linkage Editor 

Loader 

Sort/Merge 

TESTRAN 

Data set utilities 

System utilities 

Independent utilities 



-H 



L ± ; J 



The language translators enable you to write a problem solution or an 
application in a language that can be more readily learned and more 
easily used than the machine language of the computing system. IBM 
provides six language translators (see Table 1). The language 
translators, also known as compilers, prepare machine language programs 
from computer programs written in higher-level languages- A translator 
generates one or more machine instructions for each higher- level 
language statement. This process is known as compilation. The machine 
language program that is produced from a source program is called an 
object module . 

The linkage editor, a service program, combines object modules that 
have been individually compiled or assembled. The result is a load 
module . This load module is then ready to be loaded into main storage 
and executed. Another service program you can use to accomplish link 
editing is the loader. It combines link editing and execution by 
loading object modules produced by the language translators and load 
modules produced by the linkage editor into main storage for execution. 
Other service programs that are supplied to aid you in processing your 
job are the sort/merge program, TESTRAN, and the utility programs. The 
sort/merge program is a generalized program that can be used to sort or 
merge fixed-or variable- length records in ascending or descending order. 
TESTRAN, a set of macro instructions, is provided for use in testing 
assembler programs. The utility programs are divided into three 
subsets: data set, system, and independent utilities. Data set 
utilities are designed to help you in the manipulation of data. They 
aid you in doing such things as transferring, copying, or merging sets 
of data from one I/O device onto another. The system utilities are used 
to change or extend the indexing structure of the system library catalog 
and to print an inventory of the data and programs that are cataloged in 
the system library. Independent utilities are used chiefly by the 
system programmer to prepare direct access storage for use under the 
operating system. 

In order to use the processing programs you simply request the 
particular program you want by coding the name of the program on a job 
control language statement. For example, you may write a program in 
COBOL to process insurance premium payments. Your program must be 
compiled (translated into machine language) and link edited before it 
can be executed. This means that your job will be organized into three 
parts. The parts of a job are known as job steps and, in this case, you 
will have three job steps . 
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In the first step,, you code on a JCL statement the name of the COBOL 
compiler you are requesting. In this step, you also include JCL 
statements to describe any data sets that the compiler requires. The 
COBOL compiler will translate your source program into machine 
instructions and produce an object module. In the next step, you use a 
JCL statement to request the linkage editor. Again you include JCL 
statements to describe any data sets that may be required by the linkage 
editor. The linkage editor uses the object module as its input data and 
produces a load module. A load module is the executable form of a 
program. In the last step, you request that your program (the load 
module form) be executed. You will have to describe any data sets that 
will be used by your program (such as the actual insurance premiums and 
the master file) and where the output of the job step is to go. 



THE CONTROL PROGRAM AND JCL 

The control program must perform three functions: job management, task 
management, and data management. 

• Job management involves the reading and interpretation of the job 
control language statements, the scheduling of the jobs, the 
initiation and termination of jobs and job steps,, and the recording 
of job output data. 

• Task management monitors and controls the entire operating system, 
and is used throughout the operation of both the control program and 
processing programs. 

• Data management's purpose is to simplify storage, retrieval, and 
maintenance of all data, regardless of the way it is organized. 

Through the use of the job control language (JCL), you communicate 
with the job management area of the control program and specifically 
with the job scheduler . Table 2 givesf you a brief summary of the 
components of job management and a synopsis of what each component does. 
JCL statements indicate to the job scheduler what the work is you want 
done. With JCL statements, you tell the job scheduler at what point 
your job begins, the name of your job, how you organized your job, the 
programs to be executed,, where your data is, and the storage 
requirements of the programs- 

The job scheduler consists of three areas: the reader/interpreter, 
the initiator/terminator, and the output writer. The reader /interpreter 
reads and analyzes your job control statements. It checks to make sure 
that you have not made errors in coding your statements. The 
reader/ interpreter places the information contained in the job control 
statements into a series of tables that will be used by the system. The 
initiator/terminator assigns to each step of your job the resources that 
you have requested, notifying the operator of any tapes or disk packs 
that have to be mounted. A job step is a logical division of your job. 
Each step is associated with one processing program or procedure, and 
related data. A job consists of one or more steps. 
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Table 2. Job Management 

i 

I MASTER SCHEDULER 



h- 



JOB SCHEDULER 
Reader/Interpreter 

• Reads and analyzes job control 
Statements from the input 
stream. 

• Places information contained 
in the job control statements 
into a series of tables. 

Initiator/Terminator 

• Allocates resources required 
to perform a step of the job. 

• Loads and transfers control to 
the program that is to be 
executed to perform the job 
step. 

• Terminates the job step when 
execution of the program is 
completed. 

• Selects a job from the input 
work queue. 

Output Writer 

• Controls the writing of job 
output data. 

~L . J 



• Relays messages to and from 
the system to or from the 
operator . 

• Executes operator commands. 

• Responds to replies from the 
operator. 



• Starts and stops the 
reader/interpreter, 
initiator/terminator, and 
the output writer tasks. 



After the initiator/terminator has assigned the requested resources 
to a job step,, it then requests the supervisor program, a part of task 
management, to initiate the execution of the program you have specified 
in your job step. When the program is completed, the 
initiator/terminator terminates the job step, releasing the resources 
that have been assigned to the step and, thereby, making them available 
for use by other job steps. After the execution of the last step in 
your job,, the output writer records the output of your job. Your output 
is directed to the device you have specified in your JCL — a tape unit, 
a printer, or a card punch. 

Now that you have an overview of what the control program does for 
you and how your JCL statements relate to it, let us look briefly at the 
three configurations of the operating system control program. 



Control Program Configurations 
| There are two configurations of the control program: 

• MPT — multiprogramming with a fixed number of tasks. 

• MVT — multiprogramming with a variable number of tasks. 

The MFT control program reads jobs in sequential order from up to 
three input streams concurrently. Up to 15 job steps, from 15 different 
jobs,, can be performed simultaneously. The MFT control program can also 
concurrently record as many as 36 streams of job output. 
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The MVT control program reads one or more input streams of jobs and 
schedules the jobs in order of priority (you assign the priority). Up 
to 15 independent jobs can be performed concurrently. The job steps 
within a single job are performed in sequential order because one step 
may depend on the completion of another. Within a job step, any number 
and type of data processing tasks can be initiated. The MVT control 
program can concurrently record job output on as many as 36 devices. 

The job control language statements are basically the same for the 
two configurations, but some parameters coded on the statements are not 
meaningful for both. For example , in both MFT and MVT, you can use a 
parameter to assign a dispatching priority to a job. In MVT, you can 
also use a parameter to assign a dispatching priority to a job step. 
This parameter, however, has no meaning in MFT. All the parameters in 
this book apply to systems with MFT and MVT unless otherwise noted. 
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Job Control Language Statements 

The nine job control language statements for describing your job to the 
system are: 

1. Job (JOB) statement. 

2. Execute (EXEC) statement. 

3. Data definition (DD) statement. 

4. Delimiter statement. 

5. Null statement. 

6. Procedure (PROC) statement. 

7. Procedure end (PEND) statement. 

8. Comment statement. 

9. Command statement. 

A job control statement consists of one or more 80-byte records. 
Most jobs are submitted to the operating system for execution in the 
form of 80- column punched cards. The operating system is able to 
distinguish a job control statement from data included in the input 
stream, in columns 1 and 2 of all the statements except the delimiter 
statement, you code //. For the delimiter statement, you code /* in 
columns 1 and 2 and this notifies the operating system that the 
statement is a delimiter statement. For a comment statement, you code 
an * in column 3 in addition to coding // in columns 1 and 2. 

Parameters coded on these JCL statements help the job scheduler to 
regulate the execution of jobs and job steps, retrieve and dispose of 
data, allocate I/O resources, and communicate with the operator. 



JOB STATEMENT 

The job statement (or JOB statement) indicates to the system at what 
point a job begins (see Figure 1). On the JOB statement, you code the 
name of your job. This name is used to identify messages to the 
operator and to identify your program output. By using the parameters 
allowed on the JOB statement, you can provide accounting information for 
your installation's accounting routines, specify conditions for early 
termination of your job, assign job priority, request a specific class 
for job scheduler messages, hold a job for later execution, and limit 
the maximum amount of time the job may use the central processing unit 
(CPU). With MVT, you can also specify the amount of main storage to be 
allocated to the job,. 
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Stream 



Job 



< \ EXEC & DD 

1 .__ Statements 


JOB Statement 
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Figure 1. Defining Job Boundaries 



EXEC STATEMENT 

The EXEC statement marks the beginning of a job step and the end of the 
preceding step (see Figure 2). On the EXEC statement, you identify the 
program to be executed or the cataloged procedure to be called. A 
cataloged procedure is a set of job control language statements that has 
been assigned a name and placed in a partitioned data set known as the 
procedure library. 

The EXEC statement can also be used to provide job step accounting 
information, to give conditions for bypassing or executing a job step, 
to assign a limit on the CPU time used by a job step, and to pass 
information to a processing program such as the linkage editor. All 
this information is communicated to the system by the parameters that 
you can code on the EXEC statement. In systems with MVT, you can use a 
parameter to specify the amount of main storage to be allocated to the 
job step. 
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DD STATEMENT 

A DD statement identifies a data set and describes its attributes. 
There must be a DD statement for each data set used or created in a job 
step, The DD statements are placed immediately after the EXEC statement 
for the step. The parameters of the DD statement provide the system 
with such information as the name of the data set, the name of the 
volume on which it resides, the type of I/O device that holds the data 
set, the format of the records in the data set, and the method that will 
be used to create or access the data set. The name of the DD statement 
provides a symbolic link between a data set (file) named in your program 
and the actual name and location of the corresponding data set. This 
symbolic link allows you to relate the data set in your program to 
different data sets on different occasions. 



DELIMITER AND NULL STATEMENTS 

The delimiter statement (or /* statement) and null statement (or // 
statement) are markers in an input stream. The delimiter statement is 
used to separate data placed in the input stream from any JCL statement 
that may follow the data. The null statement can be used to mark the 
end of the JCL statements and data for a job. 



PROC AND PEND STATEMENTS 

The PROC statement may appear as the first JCL statement in a cataloged 
or in- stream procedure. For cataloged procedures, the PROC statement is 
used to assign default values to parameters defined in the procedure. 
An in-stream procedure is a set of job control language statements that 
appear in the input stream. The PROC statement is used to mark the 
beginning of an in-stream procedure. The PEND statement is used to mark 
the end of an in-stream procedure. 



COMMENT STATEMENT 

The comment statement can be inserted before or after any JCL statement 
that follows the JOB statement and can contain any information you think 
would be helpful to you or any person looking at your program. 



COMMAND STATEMENT 

The command statement is used to enter commands through the input 
stream. Commands can activate and deactivate system input and output 
units, request printouts and displays, and perform a number of other 
operator functions. 
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Figure 2. Defining Job Step Boundaries 
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Defining Your Job 

Now that you have been introduced to the nine JCL statements, let us use 
these statements to define a job. Basically, the statements with which 
you will be most concerned are the JOB, the EXEC, and the DD statements. 
The delimiter and null statements are used in most jobs, but they are 
easy to code and contain no parameters- 
Assume you have coded and punched (transcribed onto cards) a program 
to process payroll records. The program is coded in PL/I and, like the 
insurance premium program discussed earlier, it must be compiled and 
link- edited before it can be executed. Therefore, you job will have 
three steps: compilation,, link-editing, and execution. 

First, you must code a JOB statement to mark the beginning of your 
job. On this statement, you must assign a name to your job so that both 
the system and the operator will be able to identify it. For example, 
you could code: 

// PAYROLL JOB ( D 5 87 06 , GROUP1 ) , WOO DEN , 

Name of Accounting Programmer's 

the job information name 

After the JOB statement,, you code an EXEC statement to mark the 
beginning of the first step. On this statement, you code the name of 
the PL/I compiler you are requesting to translate your source program 
into machine language. For example, you would code: 

//COMPILE EXEC PGM=IEMAA,PARM= t LOAD, NODECK* 

/ / \ 

Name of Name of the Information being 

the job step PL/I compiler passed to the compiler 

you are requesting 

Following the EXEC statement, you code a DD (data definition) 
statement for each data set the PL/I compiler requires. One of these DD 
statements must tell the compiler that you are placing your source 
program in the input stream. Another DD statement must be used to tell 
the compiler where to place the machine language translation of your 
program (the object module). The other DD statements should be used to 
define work areas, for printing messages, and for compilation listings. 
(A listing is a printout of the source language statements of a 
program.) After you code all the DD statements needed by the PL/I 
compiler, you should code a delimiter statement to separate your source 
program from the JCL statements of the next step. Your source program 
will be placed in the input stream following the DD statements for this 
step and before the delimiter statement. For example, you would code 
the following DD statement to be placed before your source program. 

//SYSIN DD * 
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The next step must begin with an EXEC statement and, on this 
statement, you request the linkage editor. The linkage editor, like the 
PL/I compiler,, will require certain data sets. Each data set that is 
required by this step must have a DD statement coded to describe it. In 
this step, you must include a DD statement telling the linkage editor 
where the PL/I compiler placed the object module. You must also include 
a DD statement telling the linkage editor where it is to place the load 
module it produces. The load module is the executable form of your 
program. Other DD statements should be included for work areas,, for 
printing messages, and for listings. 

The third step calls for the actual execution of your program. The 
EXEC statement for this step requests that your program (the load module 
produced by the previous step) be executed. You will need to code DD 
statements to tell your program where the payroll records are that you 
want to process. Following the DD statements for this step, you can 
include the payroll records (if they are in card form). Otherwise you 
indicate to your program that the payroll records are on magnetic tape 
or a direct access volume. Assume you are including the payroll records 
in card form. The last DD statement for the step should indicate to the 
system that the data following it is to be used by your program. You 
will need DD statements to tell your program where the master file is 
and where you want the output of your program to go, and to define any 
work areas or other data required by your program. You can code a null 
statement to be placed at the end of your deck. The null statement will 
indicate to the system that this is the end of your job. Once your 
entire job (the JCL, the payroll records, and your source program) is in 
card form (see Figure 1), it is ready to be submitted for processing. 

Another way of defining your job is through the use of a cataloged 
procedure. IBM supplies a catalog procedure which defines the steps 
needed for compilation., link-editing, and executing your PL/I program, 
or you can write your own. The procedure described in the previous 
discussion might be cataloged for this purpose. 
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Figure 3. Your Job 
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Cataloged and In-stream Procedures 
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Often the same set of job control statements is used repeatedly with 
little or no change (for example, to specify compilation, link-editing, 
and execution of programs). To save programming time and to reduce the 
possibility of error, standard job step definitions can be prepared and 
placed (cataloged) in a partitioned data set known as the procedure 
library. The procedure library (SYS1.PR0CLIB) is a system data set 
maintained on direct access storage by the control program. A set of 
job control language statements placed in the procedure library is 
called a cataloged procedure . A cataloged procedure consists of EXEC 
and DD statements. 

/ 
By simply using a JOB statement and an EXEC statement, you can 
retrieve a specific catalog procedure. You specify on the EXEC 
statement the name of the procedure you want. This directs the job 
scheduler to use the job step definition from the procedure library. 
The effect is the same as if the job control statements of the cataloged 
procedure appeared in the input stream in the place of the EXEC 
statement that calls the procedure. If necessary, you can modify the 
cataloged procedure by a process known as overriding . 

Before putting a procedure you want to catalog in the procedure 
library, you may want to test it. This can be done by converting the 
procedure to an in-stream procedure. An in-stream procedure is a set of 
JCL statements placed in the input stream that can by used any number of 
times during a job by naming that procedure in an execute (EXEC) 
statement. Another advantage to in-stream procedures is that they can 
give you the facility of a cataloged procedure without being placed on 
the procedure library. After testing the procedure, you may keep it in 
card form and simply insert it in the input stream whenever you want to 
use it. 

Processing Your Job 

To have a job processed, you must submit the JCL statements and any 
related input data to the operating system through an I/O device (input 
unit) chosen by the operator. The input imit can be a card reader, a 
magnetic tape, a telecommunications line, or a direct access device. 
The sequence of JCL statements and input data for all the jobs being 
submitted through an input unit is called the input stream . 

Assume you submit a PL/I payroll job to be processed by a system with 
MFT. The program is in the form of punched cards, called a deck . The 
operator places your deck in the card reader (input unit) together with 
decks for other jobs to be processed. In this case, the card decks for 
all these jobs constitute the input stream (see Figure 2). 

The operator starts the reader; that is, he instructs the operating 
system (job management) to start reading the input stream. Job 
management stores the control statements of the first step in the job 
queue data set (SYS1. SYSJOBQE) until they are used. Then it examines 
the first step and determines its needs. The first step of your job 
requests the PL/I compiler and defines several data sets. The operating 
system (data management) determines whether there is any space available 
on the devices you requested for the data sets the PL/I compiler will 
create during this step (for example, the object module) and whether the 
data sets required by the compiler are available (for example, your 
source program) . 

If all data set requirements are met, the PL/I compiler is brought 
into main storage and given control. After your program is compiled, 
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the operating system reads and determines the requirements of the second 
step which requests the linkage editor. The operating system performs 
the same operations for the data sets required by the linkage editor and 
then brings the linkage editor into main storage and gives it control. 
After the linkage editor produces the load module, the operating system 
reads and processes the third step. Its requirements are determined, 
and your program is brought into main storage and given control. 

While this job is being executed, the system can also execute up to 
15 other jobs from up to 3 input streams. 



Capabilities of the Job Control Language 

The job control language provides you with many capabilities to help in 
efficiently getting your job coded and processed. The language allows 
you to: 

• Specify the device requirements of a program at the time it is 
executed rather than when it is assembled or compiled. You do this 
by writing a program in such a way that it is not directly tied to a 
particular I/O device. A device -independent program could, for 
example, accept an input data set from any magnetic tape or direct 
access device,, or from any card reader; output could be recorded on 
any appropriate I/O device. At the time you submit the program for 
execution, you code in your JCL the type of device required. 

• Copy existing data set names, control statements, and control blocks 
with a backward reference facility to reduce receding. When coding 
a DD statement, you simply use this facility to refer the system to 
an earlier DD statement that contains certain information you want 
copied. 

• Pass data sets used by more than one step from one step to another, 
to reduce mounting and retrieval time. 

• Retrieve a data set by name using the system catalog , eliminating 
the need to know its exact location. 

• Optimize use of channels,, units, volumes, and direct access space. 
For example, when two or more data sets are to be used in a job 
step, processing time may be shortened by requesting that the system 
transmit data over separate channels (A channel is a hardware device 
that connects a CPU and main storage with input/output control 
units). It would be faster to have your input data set and your 
output data set on separate channels than to have them on the same 
channel. A JCL parameter allows you to request channel separation 
for data sets in each job step. 

• Specify that data sets are to be shared by two or more job steps 
that are operating independently. 

• Classify jobs according to their characteristics and importance so 
that the system may balance the mix of jobs for more efficient 
operation. The characteristics of the job will determine its class 
and the turn around time required by a job will determine its 
priority . For example, an installation may assign jobs that use a 
large amount of main storage to one class,, jobs that run for a long 
time to another, and teleprocessing jobs to another class. Within 
each class you may assign priorities to determine the order of 
execution. In the class of "jobs that run for a long time",, you may 
wish to assign a higher priority to the weekly payroll program than 
to the monthly analysis program. Each job is executed one step at a 
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time and steps of different jobs can be interleaved. For example, 
if while the system is executing a job that runs for a long time 
enough resources are available to process teleprocessing jobs, 
several teleprocessing jobs can also run. 

Once you learn the basics of the job control language, you should 
become familiar with these and other capabilities of the language that 
have been designed to make the most efficient use of the operating 
system. Part II of this publication will introduce you to the various 
parameters that can be coded on the JCL statements. The facilities that 
have been briefly explained here are discussed in greater detail with 
examples of their use. All examples in Part II appear on shaded areas. 
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Part II 



Coding Conventions 



Coding 



The job control statements must conform to certain conventions. That 
is, you must follow certain simple rules when coding JCL for your job. 
These rules concern fields in the JCL statements, spacing of those 
fields, continuing the statements onto additional cards or card images, 
coding special characters, using the "backward-reference" facility ,, the 
notation used to define JCL statements in this publication, and a coding 
form for JCL statements. 



Fields in the JCL Statements 



JCL statements contain five fields: 

1. identification 

2. name 

3. operation 

4 . operand 

5. comments 

The appropriate identification is required for each statement. In 
some statements, one or more of the remaining four fields are omitted. 

Figure 4 shows the fields in each statement. 



Statement 



| Fields 

| //name JOB operand 1 - comments 1 
| //name 1 EXEC operand comments 1 



Job 

Execute 

Data definition (//name 1 DD operand comments 1 

PROC( cataloged) {//name 1 PROC operand comments 1 

PROC (in-stream) j//name PROC operand 1 comments 2 

PEND | //name 1 - PEND comments 1 

Command |// operation operand comments 1 

Delimiter | /* comments 1 

Null |// 

Comments | //* comments 



H 






1 Optional 

2 0ptional — Do not code comments unless you code one or more 
operands. 

L 

Figure 4. JCL Statement Fields 



—j 
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The identification field indicates that the statement is a JCL 
statement. It contains identifying characters (//,/*, or //*) which 
must begin in column 1. 

The name field identifies the JCL statement so that other statements 
or system control blocks can refer to it. It can range from one to 
eight characters in length, and can contain any alphameric or national 
(a, $, and #) characters. However, the first character of the name 
must be a letter or national character and must be in column 3. 

The operation field specifies the type of JCL statement, or, in the 
case of the command statement, the command. It can contain only one of 
a set of prescribed operations or commands. The operation field has no 
column requirements, but must be preceded and followed by at least one 
blank. 



The operand field contains parameters separated by commas. 
Parameters are composites of prescribed words (keywords) and variables 
for which information must be substituted. The operand field has no 
fixed length or column requirements, but must be preceded and followed 
by at least one blank. (Note that you must not code blanks between the 
parameters in the operand field.) 

The comments field can contain any information thought helpful by 
the person who codes the control statement. It has no fixed length or 
column requirements, but must be separated from the operand field by at 
least one blank. 

Except for the comment statement, identifying characters and fields 
are contained in columns 1 through 71 of the control statement. If the 
total number of characters exceeds 71, code the excess characters on 
one or more continuation statements. In the comments statement, 
comments can be coded in columns 4 through 80. The comments cannot be 
continued onto another statement. (If you need more space for 
comments, use several consecutive comments statements.) 



Parameters in the Operand Field 

The operand field is made up of two types of parameters: positional 
parameters and keyword parameters. A positional parameter is 
characterized by its position in the operand field in relation to other 
parameters; a keyword parameter is positionally independent with 
respect to others of its type, and is characterized by a keyword 
followed by an equal sign and variable information (a keyword 
parameter) . Both positional parameters and the variable information in 
keyword parameters can be in the form of a list of several items 
(subparameters) of information. You must not code blanks between the 
parameters or subparameters of the operand field. 
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Positional parameters must be coded in the operand field in a 
specific order and before any keyword parameters are coded. The 
absence of a positional parameter is indicated by a comma coded in its 
place. However, if the absent positional parameter is the last one, or 
if all later positional parameters are also absent, you need not code 
replacing commas. If all positional parameters are absent from the 
operand, you need not code any replacing commas. 

Keyword parameters must follow the positional parameters, but can be 
coded anywhere in the operand field with respect to each other. 
Because of this positional independence, you need not indicate the 
absence of a keyword parameter. 

A positional parameter or the variable information in a keyword 
parameter sometimes assumes the form of a list of subparameters . Such 
a list may be composed of both positional and keyword subparameters 
that follow the same rules and restrictions as positional and keyword 
parameters. You must enclose a subparameter list in parentheses, 
unless the list reduces to a single subparameter. 

The EXEC statement and DD statements associated with cataloged 
procedures can contain one other type of parameter — a symbolic 
parameter . A symbolic parameter is characterized by a name preceded by 
an ampersand (€). A symbolic parameter stands as a symbol for a 
parameter, a subparameter, or a value. Symbolic parameters allow you 
to make any information in the operand field of a procedure EXEC 
statement or DD statement variable. The value to be assumed by a 
symbolic parameter is coded on the EXEC statement that invokes the 
procedure. This value is in effect only during that execution of the 
procedure. 



Spacing JCL Statement Fields 

Except for the identifying characters in columns 1 and 2, or columns 1,, 
2, and 3, and the name field beginning in column 3, control statement 
fields can be written in free form, that is, they need not begin in a 
particular column. The only requirement is that you separate the name, 
operation, operand, and comments fields by at least one blank. Since a 
blank serves as a field delimiter, the operand field must be coded 
continuously, that is, you cannot code blanks between parameters. 



Coding 
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Continuing JCL Statements 

Except for the comment statement, JCL statements are contained in 
columns 1 through 71 of cards or card images* If the total length of a 
statement exceeds 71 columns, or if you wish to place parameters on 
separate cards, you must follow the operating system continuation 
conventions. To continue an operand field: 

1. Interrupt the field after a complete parameter or subparameter, 
including the comma that follows it,, at or before column 71. 

2. Separate any comments from the interrupted field with at least one 
blank. Comments must end at or before column 71. 

3. Code the identifying characters // in columns 1 and 2 of the 
following card or card image. 

4. Continue the interrupted operand beginning in any column from 4 
through 16. If you leave the statement blank after column 2 or if 
you begin coding after column 16, the system assumes that no other 
operands are present and treats any characters you code as a 
comment field. 



Note ; Optionally, a nonblank character can be coded in column 72 of 
the card to indicate that the operand field continues on the next card. 

Comments can be continued onto additional cards after the operand has 
been completed. To continue a comments field: 

1. Interrupt the comment at a convenient place, at or before column 
71. 

2. Code a nonblank character in column 72. 

3. Code the identifying characters // in columns 1 and 2 of the 
following card or card image. 

4. Continue the comments field beginning in any column after column 
3. 

Note that comments written on a comments (//*) statement cannot be 
continued. You should use several comments statements if you need more 
space for comments . 

Figure 5 illustrates the continuation conventions. 

r ■ 1 

//NAME DD POSITIONALPARAMETER,KEYWORD= VALUE, COMMENT f 

// KEYW0RD=(VALUE1,VALUE2,VALUE3, COMMENT 

// VALUE 4, VALUE 5) ANOTHER COMMENT X| 

// MORE COMMENTS WITHOUT OPERANDS REQUIRE Xj 

// NONBLANK CHARACTER IN COL. 72 OF PRECEDING CARD 

//* THIS IS A COMMENTS STATEMENT, IN ORDER 

//* TO CONTINUE IT USE ANOTHER COMMENTS STATEMENT 
L * . . . . J 

Figure 5. Continuing JCL Statements 
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Coding Special Characters 



Alphameric, national, and special characters are used in writing JCL 
statements* Table 3 defines the alphameric, national, and special 
character sets. Special characters are used in JCL to delimit 
parameters and fields, and to perform other syntactical functions. 
With the exception of the cases listed below, parameters must be coded 
in alphameric and national characters. 




Table 3. Character Sets 



| Character Set 
Alphameric 



National 



Special 



Letters 
Numbers 

"At" sign 
Dollar sign 
Pound sign 



Contents 



Comma 

Period 

Slash 

Apostrophe 

Left parenthesis 

Right parenthesis 

Asterisk 

Ampersand 

Plus sign 

Hyphen 

Equal sign 

Blank 



A through Z 
through 9 



Seven parameters are exempt from the special character rule, that 
is, they can contain special characters as well as alphameric and 
national characters: 

1. The accounting information on the JOB statement. 

2. The programmer's name on the JOB statement. 

3. The checkid field of the RESTART parameter on the JOB statement. 

4. The ACCT parameter on the EXEC statement. 

5. The PARM parameter on the EXEC statement. 

6. The DSNAME parameter on the DD statement. 

7. The volume serial number in the VOLUME parameter on the DD 
statement. However, when using various typewriter heads or 
printer chains, difficulties in volume serial recognition may 
arise if you use other than alphameric characters in the VOLUME 
parameter. 
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If any of these parameters contain special characters, you must 
notify the system of this by enclosing the item that contains the 
special characters in apostrophes (5-8 punch), e.g., ACCT= I 123+456" . 
If one of the special characters is in apostrophe,, you must identify it 
by coding two consective apostrophes in its place, for example 
•0' 'NEILL' , 

In five cases , parameters can contain special characters and not be 
enclosed in apostrophes: 

1. The programmer's name on the JOB statement can contain periods 
without being enclosed in apostrophes, e.g., T.JONES. 

2. In the UNIT parameter of the DD statement, the unit address can 
contain a slash and the unit type can contain a hyphen without 
being enclosed in apostrophes, e.g., UNIT=293/5, UNIT=2400-2. 

3. The account number and items of accounting information on the JOB 
statement, the ACCT parameter on the EXEC statement, and the 
volume serial number in the VOLUME parameter on the DD statement 
can contain hyphens without being enclosed in apostrophes. 

4. The DSNAME parameter on the DD statement can contain hyphens 
without being enclosed in apostrophes. If the DSNAME parameter is 
a qualified name, it can contain periods without being enclosed in 
apostrophes. If the statement identifies a generation of a 
generation data group, the generation number in the DSNAME 
parameter can contain a plus or minus (hyphen) sign without being 
enclosed in apostrophes. If the DD statement defines a temporary 
data set, the DSNAME parameter can contain, as the first two 
characters, ampersands without being enclosed in apostrophes. 

5. Any parameter that makes a backward reference can contain an 
asterisk and periods without being enclosed in apostrophes. (See 
"Backward Refer ences n below.) 



Backward References 

Many parameters in the JCL statements allow you to use a 
backward- reference facility to fill in information. This 
backward -reference facility permits you to copy previously coded 
information or refer to DD statements that appear earlier in the job. 
Most backward-references are of the form ♦.stepname. ddname , where the 
term "stepname" identifies an earlier job step and "ddname" identifies 
the DD statement to which you are referring. The named DD statement 
must be contained in the named job step. If the DD statement appears 
in the same job step as the reference, you can eliminate the term 
stepname, i.e., ♦. ddname . 

When the DD statement is contained in a cataloged procedure step,, 
you may want to refer to it in a later job step outside the procedure. 
In order to refer to it, you must give both the name of the job step 
that invokes the procedure and the name of the procedure step that 
contains the DD statement, i.e., ♦ . stepname . proc stepname. ddname . 
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Notation for Defining JCL Statement Parameters 



The formats of the parameters described in this publication for the 
JOB, EXEC, and DD statements appear in the chapters on those 
statements- Notations used in the format descriptions are described 
below. 



Coding 



1 . Uppercase letters and words are coded on the JCL statement exactly 
as they appear in the format description, as are the following 
characters. 



ampersand 

asterisk 

comma 

equal sign 

parentheses 

period 



() 



2. Lowercase letters, words, and symbols appearing in the format 

description represent variables for which specific information is 
substituted when the parameter is coded. 

For example, PRTY=priority is the format description for the PRTY 
parameter. When you code the PRTY parameter on a JOB statement, 
you substitute a number for the word "priority. " 



Braces {} are a special notation and are never coded on a JCL 
statement. Braces are used to group related items; they indicate 
that you must code one of the items. 



For example. 



iTRK 
CYL 
block size 



is part of the format description 



must code either TRK, CYL, or a substitute for "block size," which 
would be a number. 



4. Brackets U are a special notation and are never coded on a JCL 
statement. Brackets indicate that the enclosed item or items are 
optional and you can code one or none of the items. 

For example, I, DEFER] is part of the format description for the 
UNIT parameter. When you code the UNIT parameter, you can include 
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/ 



An example of more than one item enclosed in brackets is 

which is part of the format description for the IABEL parameter! 
When you code the IABEL parameter, you can include either 
EXPDT=yyddd or RETPD=nnnn in the LABEL parameter or omit both. 



Sometimes, one of a group of items enclosed in brackets is a 
comma. You code the comma when none of the other items in the 
group is used and a following part of the parameter is still to be 
coded. The comma indicates to the system that you have not 
selected to code any of the items enclosed in brackets. 

For example, l~, pro gname| [ ,form number]) is part of the format 

[■ J 

description for the SYSOUT parameter. When you code the SYSOUT 
parameter, you have the option of coding both ",progname" and 
", form number", omitting both, or coding only one. The comma 
enclosed in brackets with " , progname" must be coded when 
", progname" is not coded but ",form number" is coded; that is, you 



Sometimes, one of a group of items enclosed in brackets is 
underscored. This means that the underscored item is assumed if 
you omit coding any of the items in the group. 



For example , V. DELETE 
. KEEP 
CATLG 



'[; 



is part of the format description 



of the DISP parameter. If you omit coding any of the items in the 

5. An ellipsis ... (three consecutive periods) is a special notation 
and is never coded on a JCL statement. An ellipsis is used to 
indicate that the preceding item can be coded more than once in 
succession. 

For example, COND=( (code, operator), ... ) is the format description 
for the COND parameter on the JOB statement. The ellipsis 



i 
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Coding Form 

For your convenience in coding JCL statements, you can use Form N74167, 
a punch card containing formatted lines, each representing a different 
type of statement. (See Figure 6.) Some of the lines can be used for 
concatenations, overrides, and continuation statements. 



Coding 



1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 



I 213 Jobnome-Vor. 101 112 H] \iS 

ft I I I I I I I JlOlB 



b // 



3 Stepm 

LL 



ElXiEiC 



ElXiEiC 



JOB Statement Operands 



EXEC Statement Operands 



EXEC Statement Operands 



I I 1 , 1 I I 



DiD 



DD Statement Operands 



For Concatenations} 



DD Statement Operands 



'iihr jjjl 



3 Stepname . ddname-Var. 
I I I I I I I I I I I I 



3r,Optkmal 12 

I I I I I I I IpiRiQiC 



J_L 



DD Statement Operands (This statement fdj 



PROC Statement Operands 



Delimiter Statement Comments 



4 Command Verb-Var 13 



Command Statement Operands 



Blank Null Statement 



Comment Statement Comments 



3 Continuation Statements (For all above except Delimiter, Command, Null, Comment Statements) 



3 4 Continued Operands From Preceding Statement, Starting Before Column 17 



OOOOOOOO 



OOOO0IOO 



00000200 



00000300 



00000400 



00000500 



00000600 



00000700 



00000800 



00000900 



00 00 10 00 



00001 100 



12 3 4 5 6 7 8 9 10 1112 13 14 15 16 17 18 19 20 2122 23 24 25 26 27 28 29 30 3132 33 34 35 36 37 38 39 40 4142 43 44 4546 47 4849 50 5152 53 54 55 56 57 58 59 60 6162 63 64 65 66 67 68 69 70 7172 73 74 75 76 77 78 79 1 



►Variable Fields Shorter Than Maximum as Shown, Allow Left Justification of Fields That Folio* 



Figure 6. JCL Coding Form 



) 
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NOTES 



Coding 
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Table 4. JOB Statement Parameters 



r 

1 


Type 


T -T- 

j Parameter | 


Function 


|P/K| 


Comments 


I 




__ + + 




+ + 





Installation 

management 

information 



accounting 
information 



programmer 
name 



Supplies an account number and 
additional accounting information 
to your installation's accounting 
routines. 



I P 



Your name. 



1 
Can be made mandatory | 



Can be made mandatory 



Operating 

system 

messages 



MSGLEVEL 
information 



Tells the operating system what 
(messages and display of 
JCL statements) you want about your 
job; e.g., device allocation 
messages . 



MSGCLASS 



+- 



Tells the operating 
system in which output class you 
want the MSGLEVEL messages and other 
job scheduler messages to appear. 



Processing 
options 



COND 



Specifies the conditions under which 
your job is to be terminated. 



TYPRUN 



Prevents your job from being exe- 
cuted until the operator releases 
it. 



I 

TIME 



Specifies the maximum amount of time 
your job may use the CPU. 



Queuing 
options 



CLASS 



Assigns your job to a job class. 



PRTY 



Assigns your job to a priority 
within its job class. 



Main storage 
options 



REGION 



Specifies the maximum region size 
required by your job. 



Systems with MVT only 



ROLL 



Specifies whether your job can use 
the rollout/rollin function to 
obtain more main storage for a job 
step and whether your job can be 
rolled out. 



Systems with MVT only 



Time sharing 
option 



NOTIFY 



k 

Checkpoint/ 
restart 



Specifies that you want to 
be sent a message notifying 
you that your job is complete. 



Systems with MVT and 
TSO only. 



RD 



RESTART 



~+ 



Specifies whether your program can 
use the automatic restart facility 
of checkpoint/restart. 



Specifies that you are resubmitting 
your program after it failed and 
that you want it restarted at some 
specific job step or checkpoint. 



Legend: P = Positional Parameter 
K = Keyword Parameter 
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The JOB Statement 



The JOB statement must be the first JCL statement of your job. It must 
contain a valid jobname in its name field and the word JOB in its 
operation field- All parameters in its operand field are optional, 
although your installation can establish that the account number and the 
programmer's name be mandatory. If no parameters are coded in the 
operand field of the JOB statement, no comments can be coded on the 
statement. 

The parameters in the operand field allow you to specify seven types 
of optional information: 

1. Installation management information. 

2. Operating system messages. 

3. Processing options. 

4. Queuing options. 

5. Main storage option. 

6. Time sharing option. 

7. Checkpoint/restart. 

Table 4 shows the parameters used for each type of information and 
their function. Please fold out Table 4 while reading this chapter. 

The following paragraphs discuss the job name and the optional 
parameters of the JOB statement. For further details refer to the 
publications IBM System/360 Operating System; Job Control Language 
Reference. 



Naming the Job 

Your job must have a name. It is required by the job scheduler portion 
of the operating system. 

The jobname is coded in the name field of the JOB statement. It can 
range from one to eight characters in length and can contain any 
alphameric or national (a, $, #) characters. However, the first 
character of the name must be a letter or national character and must 
begin in column 3. No two jobs should have the same name since more 
than one job can be executed at a time. 

The following are examples of jobnames in several JOB statements: 

//ANALYSIS JOB 

Command statements use certain keywords that you should not use as 
jobnames: 

A 

CONSOLES 

DSNAME 

JOBNAMES 

N 

Q 
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R 

SPACE 

STATUS 

T 

U 

If you must use one of these terms as a jobname, you should instruct the 
operator to enclose it in parentheses if he uses it in a command 
statement. For example, if you have assigned the jobname T to a job and 
the operator wishes to display the status of the job, he must issue a 
command stating DISPLAY (T) . If the parentheses were omitted, he would 
get the usual time-of-day and date display resulting from a DISPLAY T 
command. 

Installation Management Information 

You can specify two types of installation management information in the 
JOB statements accounting information and programmer's name. These two 
items are specified through positional parameters. The first positional 
parameter is for the accounting information; the second positional 
parameter is for the programmer's name: 

//jobname JOB account, programmer 

If you omit the accounting information, you must indicate its absence 
with a comma: 

//jobname JOB , programmer 

If you omit both the accounting information and the programmer's name 
and you are going to specify other parameters (such as MSGLEVEL) you do 
not need to indicate their absence with commas: 

//jobname JOB MSGLEVEL=... 

The accounting information or programmer's name or both can be made 
mandatory by the installation in the input reader procedure. That is, 
your job will fail if you do not write them in your JOB statement. Your 
manager or supervisor should inform you of this requirement. 



ACCOUNTING INFORMATION PARAMETER 

The first positional parameter of the JOB statement allows you to supply 
accounting information. It has the following format: 



| ( [acct#] [, additional accounting information]) 



Replace the term "acct#" with the account number to which you want the 
job charged; replace the term "additional accounting information" with 
other items required by your installation's accounting routines. Your 
manager or supervisor should tell you exactly how to code the accounting 
information parameter. The following are general rules for coding the 
accounting information. 

• The account number and each item of accounting information are 

considered subparameters and each must be separated by a comma. The 
job accounting information may be enclosed in either parentheses or 
apostrophes (5-8 punch) as long as none of the subparameters 
contains special characters. 
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• If apostrophes are used, all accounting information enclosed in the 
apostrophes is considered as one field. 

• If a subparameter contains special characters (except hyphens) , you 
can either, 1) enclose that subparameter in apostrophes and all the 
job accounting information in parentheses, or 2) enclose all the job 
accounting information in apostrophes. 

• If the special character is an apostrophe, it must be shown as two 
consecutive apostrophes. 

For example, show DEPT'D58 as: 

(12A75 # , DEPT ,, D58«,705) or ■ 12A75, DEPT' f D58, 705' 

• If job accounting information contains only an account number and 
the number does not contain special characters, you need not enclose 
the number in parentheses or apostrophes. If the account number 
does contain special characters, enclose the number in apostrophes. 

• If job accounting information does not contain an account number, 
you must indicate its absence by coding a comma preceding the 
additional accounting information. 

(, *DEPT/D58 , ,705) or • ,DEPT/D58,705' 

Job accounting information can consist of up to 142 characters 
including the commas that separate the sub parameters. This means you 
may have to continue the information onto another card* If the 
information is to be continued, enclose it in parentheses. Any 
subparameter enclosed in apostrophes must be coded on one card. To 
continue the information, follow the continuation conventions as 
outlined in "Continuing Control Statements" in the section "Coding 
Conventions". The following is an example of continuing job accounting 
information onto another card. 

//YOURJOB JOB (12A75, , DEPT/D58*, 
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PROGRAMMER'S NAME PARAMETER 

The second positional parameter indicates your name or identification to 
your installation's accounting routines. This parameter must follow the | 

accounting information. The following are rules for coding the 
programmer's name: 

• The number of characters in the name, including blanks, cannot 
exceed 20. 

• If the name contains special characters, other than periods, it must 
be enclosed in apostrophes. 

*T JONES' (blanks are special characters) 

• If the special character is an apostrophe, it must be shown as two 
consecutive apostrophes. 

For example the names O'Neill and J. O'Brien must be shown as: 

• If the job accounting information is not coded, you must indicate 
its absence by a comma preceding the programmer's name. 



Operating System Messages 

The job scheduler portion of the operating system produces messages 
about your job on the system output unit. These messages are a listing 
of the JCL statements in your job and allocation/termination messages 
indicating the resources used by your job. The MSGLEVEL parameter lets 
you choose the type of messages to be produced about your job. 

You can also specify the class of output unit on which those messages 
and other job scheduler messages are to appear. The MSGCLASS parameter 
allows you to choose from the output classes established in your 
installation's output writer procedures. Your manager or supervisor 
should tell you which output classes are available. (For information on 
output writer procedures, see the section "System Reader, Initiator and 
Writer Cataloged Procedures" in the publication IBM System/360 Operating 
System: System Programmer's Guide .) 
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MSGLEVEL PARAMETER 

The MSGLEVEL parameter tells the job scheduler what information you want 
as output from your job. You can request the following output: 

• The JOB statement. 

• All input JCL statements. 

• All cataloged procedure statements for procedures invoked by the 
job's steps, and the internal representation of procedure statements 
after symbolic parameter substitution. 

• Allocation, disposition, and allocation recovery messages 
(allocation/termination messages). Allocation/termination messages 
have the prefix IEF and are listed in the publication IBM System/360 
Operating System: Messages and Codes . 

The format of the MSGLEVEL parameter is: 

r 1 

| MSGLEVEL=( [statements] [, messages]) | 

L J 

Replace "statements" with one of the following: 

0- only the JOB statement is to be displayed. 

1- all JCL statements in your job, cataloged procedure statements, 
and the internal representation of statements after symbolic 
substitution are to be displayed. 

2- only the JCL statements in your job are to be displayed 
(cataloged procedure statements will not appear). 

Replace "messages" with one of the following: 

0- no allocation/termination messages are to appear, unless the job 
abnormally terminates . If this occurs, these messages will 
appear as output. 

1- all allocation/termination messages are to appear. 

If you omit the MSGLEVEL parameter or one of the subparameters, a 

I default value established in the input reader procedure is assumed. For 
system tasks, the system assumes a message level of (1,0). Your manager 
or supervisor should tell you the defaults chosen in your installation. 

allocation/termination messages displayed, code: 

If you want only the JCL statements in your job and all 
allocation/termination messages displayed, code: 

If you want to use your installation* s default for JCL messages and 
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If you want all your JCL statements , cataloged procedures, and 
internal representation of statments, and your installation's default 
for allocation/termination messages, code: 

If you want your installation's defaults for both JCL statements, and 
allocation/termination messages, omit the MSGLEVEL parameter. 



MSGCLASS PARAMETER 

Systems with MFT or MVT can process several jobs at the same time. If 
only one output class were used, the job scheduler messages and other 
output from all the jobs would be interspersed on the same output 
device. The MSGCLASS parameter allows you to route the job scheduler 
messages to an output class other than the normal message class, A. 

The format of the MSGCLASS parameter is: 

i * 1 

J MSGCLASS=X | 

I . J 



Replace "x" with a letter (A-Z) or a number (0-9). Your job 
scheduler messages will be produced on a device assigned to the class 
you selected. If you omit the MSGCLASS parameter, job scheduler 
messages are routed to the default output class specified in the output 
reader procedure. The default for the MSGCLASS parameter is A unless 
changed by your installation. 

Your manager or supervisor should tell you which output classes are 
available in your installation. Some of these output classes are 
standard and some are reserved for special uses. You may have to notify 
the operator if you are using a special output class in your job because 
he has to *start an output writer" for that output class in order to 
obtain the output. 



Processing Options 

There are three processing options available to your job through JOB 
statement parameters. 

The COND parameter specifies conditions for terminating your job if 
one or more of its job steps are unsuccessful. For example, if your job 
is a compile-link edit-go job, you can have your job terminated after an 
unsuccessful compilation or link edit. That is, the system will not try 
to process the remaining steps in your job thus saving computing time. 

The TYPRUN parameter prevents your job from being executed until 
released by the operator. For instance, you may tell the operator not 
to release your job until a certain other job has been processed. 

The TIME parameter lets you set the maximum amount of time your job 
may use the CPU, This parameter lets you find out how long your job 
uses the CPU and limits the CPU time wasted if your program goes into a 
"loop". 
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COND PARAMETER 

The operating system determines whether a job is to be discontinued 
after a given job step by comparing the return code produced by that job 
step to the conditions specified with the COND parameters- A return 
code is a number determined by the operating system or by the processing 
program which indicates the relative "success" of the job step. The 
return codes of the operating system and IBM-supplied processing 
programs are fixed numbers with specific meanings. They are listed in 
the publication IBM System/3 60 Operating System; Messages and Codes and 
in the publications associated with each processing program. 

Only those user processing programs written in the assembler 
language, ANS COBOL, FORTRAN, or PL/I can set return codes for testing. 
The user return codes are usually standardized in each installation. 
For example, each step in your installation's payroll program may have 
its own set of return codes. One return code for a given job step may 
indicate that all payroll records were successfully processed while 
another may indicate that there were faulty input records. You can set 
up the COND parameter so that the job is discontinued if the return code 
that indicates faulty records is produced by that job step. 

Not all return codes indicate either success or failure. For 
example, in the case of a compiler one return code can indicate no 
errors during compilation, a second code can indicate that the minor 
errors encountered are not likely to prevent link editing and execution 
of the compiled program, a third code can indicate that the major errors 
encountered will probably cause further processing of the compiled 
program to fail, and a fourth code can indicate that the compilation 
process has terminated abnormally. The COND parameter allows you to 
discontinue the job if any of these return codes are produced. You may 
choose to continue processing only if no errors are found or, for 
debugging purposes, you may choose to continue processing even if major 
errors are found. 

Note : If any job step is abnormally terminated (ABEND) , all subsequent 
steps are bypassed unless the COND parameter of the EXEC statement is 
used to prevent it. (See the section on "The EXEC Statement.") If you 
want to restart the same step that terminated abnormally you can use the 
checkpoint/restart facility of the operating system. (See 
"Checkpoint/Restart" in this chapter.) 

The format of the COND parameter is: 

i 1 

| COND= ( (code , operator) , . . . ) j 

L . J 



Replace "code" with any decimal number from to 4095. Replace the term 
"operator" with one of the following: 

GT (greater than) 

GE (greater than or equal to) 

EQ (equal to) 

LT (less than) 

LE (less than or equal to) 

NE (not equal to) 

If you coded COND= ( (50, GE) , (60,,LT)), it would read "if 50 is greater 
than or equal to a return code, or 60 is less than a return code, I want 
the remaining job steps bypassed." In other words, the job continues as 
long as return codes range from 51 through 60. If you want to make only 
one return code test, you need not code the outer parentheses. For 
example, COND= (8,NE) . A maximum of eight conditions can be established. 
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For example, it you code: COND=( (5,GT), (8,EQ), (12, EQ), (17, EQ) , (19, EQ) , 
(21,EQ), (23,LE)) your job will continue only if the return codes are: 

The tests you specify with the COND parameter are made to the return 
code, if any, produced by each step in your job. You can best take 
advantage of this parameter when the return codes of each job step have 
compatible meanings. For example, a return code of 4 from the ALGOL 
compiler indicates that the source program was compiled and some minor 
errors were found; the same return code of 4 from the linkage editor 
indicates that a load module was produced, but an error which may cause 
failure at execution time has been found. If you want to take a chance 
and continue processing even if small errors are found, you should code 
COND= (4 , LT) , that is, the job will terminate if the return code of any 
step is greater than 4. If you only want to continue processing if no 
errors are found, you should code COND=(4,Le), that is, the job will 
terminate if the return code of any step is greater than or equal to 4. 
(All codes greater than 4 indicate major errors for both the ALGOL 

If the same return code has different meanings in different job 
steps, or if you want to take different actions according to which job 
step produced the return code, you should use the COND parameter of the 
EXEC statement to set up conditions for individual job steps. 

If you omit the COND parameter from the JOB statement, no return code 
tests are performed throughout the job. If you want return codes tested 
for a given job step, use the COND parameter of the EXEC statement for 
that job step. If the COND parameter is not used in either the JOB or 
the EXEC statements, no return code tests are performed and the system 
will try to execute each step in the job. 



Note : The COND parameter of the EXEC statement is slightly different 
from the COND parameter of the JOB statement. See the section on "The 
EXEC statement". Examples of using the COND parameter in both the JOB 
and EXEC statements are also shown in that section. 



TYPRUN PARAMETER 

You cannot predict whether a job in a job class queue will be selected 
for execution before another job in a different job class queue. (Job 
classes are discussed in "Processing Your Job" in the section "Part I: 
Introduction to the Job Control Language".) If you have a job that must 
be executed after another one, you can use the TYPRUN parameter to 
prevent execution of your job until the first one completes processing. 
You must tell the operator that you have held your job and the name of 
the job that must be processed before yours. Then, when the console 
indicates that the first job has ended, the operator should issue a 
command to RELEASE your job for processing. 



The format of the TYPRUN parameter is : 



| TYPRUN=HOLD 






If both jobs are in the same job class queue, it is not enough to 
assign a higher priority to the job that must be executed first. You 
must also use the TYPRUN=HOLD parameter, because the higher priority 
controls only the selection sequence and does not guarantee that the 
first job will complete execution before the second is selected. 
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TIME PARAMETER 

The TIME parameter specifies the maximum amount of time a job may use 
the CPU. Two benefits of the TIME parameter are that it allows you to 
find out through messages how long the job uses the CPU (CPU time used 
appears on the output listing), and it helps limit the CPU time wasted 
by a step that goes into a loop. Normally, a job that exceeds its time 
limit- is terminated. However, if the System Management Facilities 
option is included in the system and a user exit routine is provided, 
this routine can extend the time limit so that processing can continue. 
(The System Management Facilities option is described in the publication 
IBM System/360 Operating System: Concepts and Facilities . User exit 
routines to be used with the System Management Facilities option are 
discussed in the publication IBM System/360 Operating System: System 
Programmer's Guide . ) 



The format of the TIME parameter is 



r • n 

| TIME=( [minutes] [, seconds] ) | 

L J 



Replace the terms "minutes" and "seconds" with the maximum number of 
minutes and seconds that the job can use the CPU. The number of minutes 
must be less than 1440 (24 hours); the number of seconds must be less 
than 60. That is, the maximum time you can specify is TIME= (143 9,59) . 

If your job may require use of the CPU for more than 1439 minutes, 
code TIME=1440 to eliminate the time limit. 

If the CPU time limit is given in minutes only,, you need not code the 
parentheses. For example, "twelve minutes" is coded TIME=12. If the 
CPU time limit is given in seconds only, you must code both the 
parentheses and a comma to indicate the absence of minutes. For 

If you omit the TIME parameter on the JOB statement, there is no CPU 
time limit assigned to the job; however, each job step is still timed. 
(See the description of the TIME parameter in the section "The EXEC 
Statement".) 

Coding TIME=1 440 also lifts the restrictions on the amount of time a 
job step may remain in a wait state. If the System Management 
Facilities option is included in the system,, the installation determines 
this time limit. In this case,, a job step remaining in a wait state for 
more than the established time limit causes termination of the job 
unless a user- provided exit routine extends the wait- state time limit 
for that step. If the System Management Facilities option is not 
included,, the system automatically provides a 30-minute time limit for 
wait states; that is, a job step remaining in a wait state for more than 
30 consecutive minutes causes termination of the job. If any of the job 
steps should be allowed to remain in a wait state for more than the 
established time limit, code TIME=1440 to eliminate the time limit. 



Note : You can specify different CPU time limits for each step in the 
job by coding the TIME parameter on the EXEC statement associated with 
each step,, as described in the section "The EXEC statement". 
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Queuing Options 

One of the most important features of MFT and MVT is the ability to 
balance the job mix by recognizing the classes and priorities assigned 
to jobs. Job classes and priorities are discussed in "Capabilities of 
the Job Control Language" in the section "Part I: Introduction to the 
Job Control Language". 

There can be up to 15 job classes in your installation. The type of 
job assigned to each class is arbitrary and should be determined by each 
installation. For example, some installations may assign a class to 
each of the following types of jobs: 

• I/O-bound jobs. 

• CPU- bound jobs. 

• Jobs that are being debugged. 

• Jobs that use a particular device. For example, if there is only 
one 7 -track tape drive in your installation, two programs that use 
that drive cannot be multiprogrammed. Therefore, those programs 
should be assigned to the same job class to avoid their simultaneous 
selection. 

In general, all jobs of the same characteristics should be in the same 
class. 

The order of execution within each class is determined by the 
priority assigned to each job. There can be up to 14 priorities in each 
class. The higher the priority the sooner your job will be executed. 

Your manager or supervisor should tell you which class and priority 
to assign to your job. 

CLASS PARAMETER 

The CLASS parameter is used to assign a job class to your job. The 
format of the CLASS parameter is: 

i " 1 

| CLASS=jobclass | 

L , J 

Replace the term "jobclass" with a letter from A through 0. For 

If you omit the CLASS parameter, or code CLASS=A, the default job 
class of A is assigned to the job. 

Note : If your installation provides time-slicing facilities in a system 
with MFT, the CLASS parameter can be used to make your job part of a 
group of jobs to be time-sliced. At system generation, a group of 
contiguous partitions are selected to be used for time- si icing, and each 
partition is assigned at least one job class. If you want your job to 
be time-sliced, specify a class that was assigned only to the partitions 
selected for time- si icing. 

PRTY PARAMETER 

Default job priorities within each class are established in the input 
reader procedure. If you wish to assign a different priority to your 
job,, use the PRTY parameter. 
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The format of the PRTY parameter is: 

r 1 

| PRTY=number | 

L J 

Replace the term "number" with a decimal number from through 13. The 
highest priority number is 13. 

Whenever possible, you should avoid using priority 13. This is used 
by the system to expedite processing of jobs in which certain errors 
were diagnosed. It is also intended for other special uses by future 
features of systems with MVT. 




Notes: 



If your installation provides time-slicing facilities in a system 
with MVT, the PRTY parameter can be used to make your job part of a 
group of jobs to be time-sliced. At system generation, the 
priorities of the time-sliced groups are selected. If the job 
priority number you specify corresponds with a priority number 
selected for time-slicing, then your job will be time-sliced. 
If you want to assign a different priority to a job step, you can 
code the DPRTY parameter on the EXEC statement associated with the 
step, as described in the next chapter. The priority assigned to 
the job applies to any step that does not use the DPRTY parameter. 



Main Storage Options (Systems With MVT Only) 

MVT processes several jobs at the same time in different regions of main 
storage. The size of each region depends on the requirements of each 
job. Once the processing of that job is completed, the system uses that 
space for other jobs. (The free space can be subdivided into smaller 
regions, used for a region the same size, or combined with adjacent free 
space for a larger region.) 

Regions are contiguous areas of main storage. However, you can 
define a two-part region if your operating system was generated with 
"Main Storage Hierarchy Support". Main storage hierarchy support 
provides for storage hierarchies and 1. If IBM 2361 Core Storage, 
Model 1 or 2, is present in the system, processor storage is referred to 
as hierarchy and 2361 Core Storage is referred to as hierarchy 1. If 
2361 core storage is not present but main storage hierarchy support was 
specified during system generation, a two-part region is established in 
processor storage when a region is defined to exist in two hierarchies. 
The two parts are not necessarily contiguous. 

The REGION parameter allows you to specify the region size to be used 
by your job. 

Notes: 

• If you want to specify different region sizes for each step in the 
job, you can, instead, code the REGION parameter on the EXEC 
statement associated with each step, as described in the next 
chapter . 

• In systems without main storage hierarchy support, processor storage 
is referred to as main storage. In systems with main storage 
hierarchy support, main storage comprises both processor storage 
(hierarchy 0) and 2361 core storage (hierarchy 1). 
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Sometimes a job step will run out of space iri its region. Normally,, 
this means that the step is terminated. However if the rollout/rollin 
option was generated for your MVT system, the system can obtain more 
space for your job step. This is done by "rolling out" (writing onto a 
direct access device) another job step that is currently being executed 
and allocating its region to your job step. After your step is 
processed, the rolled-out step is "rolled in" (read back into its 
region) and its processing continues. 

The ROLL parameter lets you specify whether the job steps in your job 
can be rolled out and whether they can cause rollout of other job steps. 

Note : ROLL parameters can also be coded on EXEC statements, but are' 
superseded by a ROLL parameter coded on the JOB statement. 

REGION PARAMETER (SYSTEMS WITH MVT ONLY) 
The REGION parameter allows you: 

1. To request the maximum amount of main storage to be allocated to 
the job. This figure must include the size of those components 
that are required by your program and are not resident in storage. 

2. To request the amount of main storage to be allocated to the job 
and in which storage hierarchy or hierarchies the space is to be 
allocated. This request should be made only if main storage 
hierarchy support is specified during system generation. 

The storage requirements you must consider when specifying a region size 
are outlined in the publication IBM System/360 Operating System; 
Storage Estimates . 

1. The format of the REGION parameter for systems without storage 
hierarchies is: 

r ■ 1 

| REGION=valueK I 

i. J 

Replace the term "value" with the number of contiguous 1024-byte 
areas you want allocated to the job, for example, REGION=52K. This 
number can range from one to five digits but cannot exceed 16383. 
It should be specified as an even number because if you specify an 
odd number, the system treats it as the next highest even number. 
If you specify the maximum of 16383, you get 16384 contiguous 
1024-byte areas; however you must not specify 16384. 

If you omit the REGION parameter, the default value (as established 
in the input reader procedure) is assumed. 

2. The format of the REGION parameter for systems with storage 
hierarchies is : 

■ r . . n 

| REGION= ( [value K3 Uvalue^K]) j 

L ' _J 

Replace the term "value " with the number of contiguous 1024-byte 
areas you want allocated to the job in hierarchy (processor 
storage) ; replace the term "value x " with the number of contiguous 
1024-byte areas to be allocated in hierarchy 1, (2361 Core 
Storage), e.g., REGION=(60K,200K) . Each value specified should be 
an even number. (If you specify an odd number, the system treats 
it as the next highest even number) . 
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The following rules apply to the hierarchy sizes: 

• If 2361 Core Storage is not present but main storage hierarchy 
support was specified during system generation, a two-part 
region is established in processor storage when a region is 
defined to exist in two hierarchies. The two parts are not 
necessarily contiguous. In this case, the sum of value and 
value ± cannot exceed 16383. For example, REGION=(10K,4K) . 

• If 2361 Core Storage is present,, value , cannot exceed 16383, 
and valuer cannot exceed 1024 if using a single Model I, or 
2048, if using a single Model 2. 

• If main storage hierarchy support was not generated and regions 
are requested in both hierarchies, the region sizes are 
combined and an attempt is made to allocate a single region 
from processor storage. If a region is requested entirely from 
hierarchy 1, no hierarchy segment is allocated. 

In systems with main storage hierarchy support, you can omit either 
subparameter, thereby requesting storage in only one hierarchy. If 
you are requesting storage only in hierarchy 1, you must code a 
comma to indicate the absence of the first subparameter, for 
example, REGION=(, 52K) . If you are requesting storage only in 
hierarchy # you need not code the parentheses, for example, 
REGION=70K. 

If you omit the REGION parameter, the default value (as established 
in the input reader procedure) is assumed. When the default region 
size is assumed, storage is always allocated in hierarchy 0. 

ROLL PARAMETER (SYSTEMS WITH MVT ONLY) 

The function of roll out/ roll in is to allocate additional main storage to 
a job step whose own region contains no more available space. In order 
to allocate this additional space to a job step, another job step may 
have to be rolled out, i.e., temporarily transferred to secondary 
storage. The ROLL parameter allows you to indicate whether or not each 
of your job steps can be rolled out and whether or not they can cause 
rollout of other job steps. 

The format of the ROLL parameter is: 

i 1 

J ROLL=(x,y) | 




.J 



The "x" declares each job step's ability to be rolled out. If "x" is 
YES ; , each job step can be rolled out; if "x" is NO, the job steps of 
this job cannot be rolled out. The "y" declares each job step's ability 
to cause rollout of another job step. If "y" is YES, each job step can 
cause rollout; if "y" is NO, the job steps cannot cause rollout- (YES 
must be specified if you want additional main storage allocated to the 
job's steps if it is required.) If you include the ROLL parameter, both 
the "x" and M y" subparameter s must be coded. 

For example, ROLL=(NO, YES) indicates that your job steps cannot be 
rolled out but that any one of them can cause roll out. 

Roll parameters can also be coded on EXEC statements, but are 
superseded by a ROLL parameter coded on the JOB statement. If this 
parameter is omitted, the default specified in the reader procedure is 
used. In the IBM-supplied reader procedures, the default specified is 
ROLL=(YES,NO). 
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Note ; Teleprocessing jobs that use the autopoll option should not have 
the ability to be rolled out. A rolled out job using this option cannot 
be restarted properly. Therefore, you should always code ROLL=(NO,YES) 
or ROLL=(NO, NO) for this kind of job. 



Time Sharing Option (Systems With MVT Only) 

Time sharing is a method of using a computing system that allows a 
number of users to execute programs concurrently and to interact with 
them during execution. The Time Sharing Option is an option of the 
operating system providing conversational time sharing from remote 
terminals. 

When using a system with MVT and the Time Sharing Option (TSO) , you 
can request that you be notified when your background job completes. 
Under TSO, a background job is one that is entered through a time 
sharing terminal by means of the SUBMIT command or through the input 
stream (SYSIN) . One job step at a time is assigned to a region of main 
storage and remains in storage to completion. 

The NOTIFY parameter allows you to indicate to the system that you 
want automatic notification when your job completes. 

NOTIFY PARAMETER 

By coding NOTIFY, you are requesting that a message be sent to your 
terminal when your job completes. 

The format of the NOTIFY parameter is : 

r 1 

j NOTIFY=userid j 

l . : : J 

Replace the term "userid" with a 1 to 7 character alphameric user 
identification; the first character must be alphabetic. The user 
identification must be the same one you use when you start your terminal 
session, i.e., the same user identification you use in the LOGON command 
must be the one used in the NOTIFY parameter. For example, if a user 
submits a job named FORMS through the terminal and his user 
identification is JOHNHC, then his JOB statement if he used NOTIFY 

//FORMS JOB NOTIFY=JOHNHC 

For a more detailed discussion of the Time Sharing Option, refer to 
IBM System/360 Operating System Time Sharing Option: Time Sharing 
Option Guide . 

Checkpoint/Restart 

When a job step abnormally terminates (ABEND), you may have to resubmit 
the job for execution. This means lost computer time and a delay in 
obtaining the desired results. To reduce these effects, you can use the 
restart facilities of the operating system provided your program is 
written in the assembler language, COBOL, or PL/I. 

If a job step abnormally terminates or if a system failure occurs, 
the restart facilities allow you to request that the job step be 
restarted either at the beginning of the step (steprestart) or at some 
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point within the step (checkpoint restart). Furthermore, restart can 
| occur automatically after abnormal termination, or it can be deferred 
f until the job is resubmitted. Automatic restarts are specified with the 

RD parameter, and defer/ ed restarts with the RESTART parameter. For 
detailed information on the checkpoint/restart facilities, using the 
assembler language refer to the Publication IBM System/ 3 60 Operating 
System: Supervisor Services ; using COBOL „ to IBM System/360 Operating 
System; COBOL (E) Programmer's Guide , or to IBM System/360 Operating 
System: COBOL (F) Programmer's Guide , or to IBM System/ 360 Operating 
System: American National Standard COBOL Programmer's Guide ; using 
PL/I, to IBM System/360 Operating System: PL/I (F) Programmer's Guide ; 
and also to "Appendix C: Using the Restart Facilities" of this 
publication, and to the publication IBM System/360 Operating System: 
Advanced Checkpoint/Restart Planning Guide . GC28-6708. 



RD PARAMETER 

A job can be automatically restarted at the beginning of the job step 
that abnormally terminated (step restart) or within the step (checkpoint 
restart). In either case, automatic restart can occur only if: 

1. you use the RD parameter to request restart, 

| 2. the completion code returned during abnormal termination indicates 
that the step is eligible for restart, and 

3. the operator authorizes restart. 

In order for checkpoint restart to occur, the CHKPT macro instruction 
(assembler), or the RERUN clause (COBOL), or the CALL IHECKPT statement 
(PL/I) must have been executed in your processing program prior to 
abnormal termination. Through the RD (restart definition) parameter, 
you can specify that step restart can occur or that the action of the 
CHKPT macro instruction (assembler), or the RERUN clause (COBOL), or the 
CALL IHECKPT statement (PL/I) is to be suppressed. 

The format of the RD parameter is : 

i 1 

| RD=request | 

L J 

Replace the word "request" with: 

R To permit automatic step restart. 

NC to suppress the action of the CHKPT macro instruction, or 
RERUN clause* or CALL IHECKPT statement, and not to permit 
automatic restart 

NR to request that the CHKPT macro instruction, or RERUN 

clause, or CALL IHECKPT statement be allowed to establish a 
checkpoint, but not to permit automatic restart 

RNC to permit step restart and to suppress the action of the 
CHKPT macro instruction, or RERUN clause, or CALL IHECKPT 
statement. 

Each of these requests is described in more detail in the following 
paragraphs . 
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RD=R : If the processing programs used by the job do not include any 
CHKPT macro instructions, (assembler), or RERUN clauses (COBOL), or CALL 
IHECKPT statements (PL/I), RD=R allows execution to be resumed at the 
beginning of the step that abnormally terminates. If any of the 
programs do include one or more CHKPT macro instructions, or RERUN 
clauses, or CALL IHECKPT statements, step restart can occur if a step 
abnormally terminates before execution of a CHKPT macro instruction or 
RERUN clause, or CALL IHECKPT statement; thereafter, checkpoint restart 
can occur. If you cancel the effects of the CHKPT macro instructions, 
or RERUN clauses, or CALL IHECKPT statements before a checkpoint restart 
is performed, the request for automatic step restart is again in effect. 

RD=NC or RD=RNC : RD=NC or RD=RNC should be specified when you want to 
suppress the action of all CHKPT macro instructions (assembler) , or 
RERUN clauses (COBOL), or CALL IHECKPT statements (PL/I) included in the 
programs used by this job. When RD=NC is specified, neither step 
restart nor checkpoint restart can occur. When RD=RNC is specified, 
step restart can occur. RD=NC has no effect on processing if CHKPT 
macro instructions, or RERUN clauses, or CALL IHECKPT statements are not 
included in the programs. 

RD=NR : RD=NR permits a CHKPT macro instruction (assembler), or RERUN 
clause (COBOL), or CALL IHECKPT statement JCPL/I) to establish a 
checkpoint,, but does not permit automatic step or checkpoint restarts. 
Instead, at a later time, you can resubmit the job and begin execution 
at a specific checkpoint. (The RESTART parameter is used for 
resubmitting a job for restart. See the next topic.) This parameter 
has no effect on processing if CHKPT macro instructions, RERUN clauses, 
or CALL IHECKPT statements are not included in the program. 

If automatic restart is requested for an abnormally terminated step 
and restart is authorized by the operator, special disposition 
processing is performed. If automatic step restart is to occur, all 
data sets in the restart step with a status of OLD or MOD, and all data 
sets being passed to steps following the restart step are kept. All 
data sets with a status of NEW in the restart step are deleted. If 
automatic checkpoint restart is to occur, all data sets currently in use 
by the job are kept. (For further information on data set disposition 
refer to the section "The DD statement" and to "Appendix C: Using the 
Restart Facilities." 

If you omit the RD parameter and no CHKPT macro instructions, or 
RERUN clauses, or CALL IHECKPT statements are executed, automatic 
restart cannot occur. If you omit the RD parameter but one or more 
CHKPT macro instructions or RERUN clauses, or CALL IHECKPT statements 
are executed, automatic checkpoint restart can occur. 

Notes x 

• If you want to make different requests for each step in the job, you 
can, instead, code the RD parameter on the EXEC statement associated 
with each step, as described in the next chapter. If you specify 
the RD parameter on the JOB statement, RD parameters on the job's 
EXEC statements are ignored. 

• MSGLEVEL=(1, 0) or MSGLEVEL= (1,1) must be coded on the JOB statement 
if automatic restart is to occur. If you omit this parameter, 
restart is not performed. 

• If restart is requested, assign each step a unique step name. (Upon 
restart,, the system searches the name field for the name of the 
abnormally terminated step. If two steps have the same name, restart 
is attempted at the first step encountered with the name regardless 
of whether or not this is the step that abnormally terminated.) 
Step names are assigned in the EXEC statement for each step. 
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RESTART PARAMETER 

If your job abnormally terminated and you are resubmitting it for 
execution, you can use the restart facilities. These facilities reduce 
the time required to execute the job since execution of the job is 
resumed, not repeated. 

Execution of a resubmitted job can be restarted at the beginning of a 
step (step restart) or within a step (checkpoint restart). In order for 
checkpoint restart to occur, the CHKPT macro instruction (in assembler 
language), or RERUN clause (in COBOL), or CALL IHECKPT statement (in 
PL/I) must have been executed in your processing program during the 
original execution of the job. Through the RESTART parameter you can 
specify where execution is to be restarted. 

Note ; Do not use the RESTART parameter the first time you run your job. 

If you want execution to be restarted at a particular job step , code 
the keyword parameter. 

r ' 1 

| RESTART=stepname | 

L . J 

in the operand field of the JOB statement before resubmitting the job. 
Replace the word "stepname" with the name of the step at which execution 
is to be restarted. You can replace "stepname" with an asterisk (*) if 
execution is to be restarted at the first job step; that is, RESTART =*. 

If you want execution to be restarted at a particular checkpoint 
within a particular job step, code the keyword parameter. 

i : 1 

| RESTART=(stepname,checkid) | 

i _ j 

in the operand field of the JOB statement before resubmitting the job. 
Replace the word "stepname" with the name of the step in which execution 
is to be restarted. You can replace "stepname" with an asterisk (*) if 
execution is to be restarted within the first job step. Replace the 
term "checkid" with the name that identifies the checkpoint within the 
step. (If the name contains special characters, it must be enclosed in 
apostrophes. If one of the special characters is an apostrophe, 
identify it by coding two consecutive apostrophes in its place.) 

If execution is to be restarted at a checkpoint, the resubmitted job 
must include an additional DD statement. This DD statement defines the 
checkpoint data set and has the ddname SYSCHK. (Do not include a SYSCHK 
DD statement if step restart is to be performed.) The SYSCHK DD 
statement is described in "Special DD Statements" in the section "The DD 
Statement. " 

If execution is to be restarted at or within a cataloged procedure 
step, you must give both the name of the step that invokes the procedure 
and the procedure step name, i.e., RESTART=stepname.procstepname or 
RESTART=(stepname.procstepname,checkid). If the first job step invokes 
a cataloged procedure and you want execution to be restarted at the 
first procedure step, you can replace "stepname.procstepname" with an 
asterisk (*). 

If the RESTART parameter is not specified on the JOB statement of the 
resubmitted job, execution of the entire job is repeated. 
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Table 5. EXEC Statement Parameters 



r — t T" 

| Type j Parameter] 



Function 



T T 

P/K | Comments 



Processing 

Program 

Information 



| 

PROC 

J___ 

Procedure 
Name 



I 

PARM 



PGM 



Names the program to be 
executed in this step. 



Names the procedure to be 
used in this step. 



Alternative way of naming 
the procedure to be used in 
this step without using the 
PROC keyword. 



Passes special control in- 
formation to those programs 
that require it. 



You must specify either a 
program name or a procedure 
name. 



Installation 

Management 

Information 

I 

Processing 
Options 



ACCT 



Supplies accounts infor- 
mation to your installa- 
tion's accounting routines. 



COND 



j. 

TIME 



Specifies conditions for 
executing or bypassing the 
job step. 



Specifies the maximum amount 
of time this job step may 
use the CPU. 



~+ 



-H 



Queueing 
Option 



DPRTY 



Assigns a dispatching prior- 
ity to the job step. 



Systems with MVT only. 



Main Storage 
Options 



REGION 



Specifies the maximum region 
size required by this job 
step. 



Systems with MVT only. 



ROLL 



Specifies whether this job 
step can use the rollout/ 
rollin function. 



K 



Systems with MVT only. 



Checkpoint/ 
Restart 



RD 



Specifies whether this job 
step can use the automatic 
restart facility of check- 
point/restart . 

X X . X X 

Legend: P = Positional parameter 
K = Keyword parameter 
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The EXEC Statement 



The EXEC statement must be the first JCL statement of each job step in 
your job. It must also be the first statement of each procedure step in 
a cataloged procedure. The EXEC statement is followed in the input 
stream by DD statements and data that pertain to the step. 



The main function of the EXEC statement is to identify the program to 
be executed or the cataloged procedure to be used. For example. Figure 
7 shows the input deck for a three-step job. The EXEC statement of the 
first step requests a program named MYPROG. The DD statements and data 
required by MYPROG follow the EXEC statement. The EXEC statement of the 
second step requests a cataloged procedure named PROCONE. When the 
second step is to be executed the system will use PROCONE. PROCONE has 
two procedure steps. The EXEC statement of the first procedure step 
requests a program named XXX; the EXEC statement of the second procedure 
step requests a program named YYY. After the cataloged procedure is 
used the third step of your job is executed. The EXEC statement of the 
third step requests a program named PRINT. The DD statements required 
by PRINT follow the third EXEC statement. Note that you only supply the 
JCL statements for your job. The cataloged procedure already exists in 
the procedure library (SYSl.PROCLIB) . Therefore, you need not be 
concerned with writing the JCL statements for the cataloged procedure 
unless you are actually writing the cataloged procedure to place it in 
the procedure library. You can, however, modify cataloged procedure 
statements by placing the corrections in the input deck for your job. 
For example, in Figure 8 the DD statements that follow the EXEC 
statement of the second step are used to make changes in corresponding 
DD statements in the cataloged procedure. The methods used for 
modifying cataloged procedures are described in the section "Part IV: 
Cataloged and In-stream Procedures" 1 . 




The EXEC statement must contain the word EXEC in its operation field. 
The stepname (name field) and most parameters in the operand field are 
optional. The only required information in the operand field is either 
the name of the program to be executed or the name of the procedure to 
be used. The parameters in the operand field allow you to specify six 
types of information: 



1. Processing program information 

2. Installation management information 

3. Processing options 

4. Queue ing option 

5. Main storage option 

6. Checkpoint restart information 



Table 5 shows the parameters used for each type of information and 
their function. Please fold out Table 5 while reading this chapter. 

The following paragraphs discuss the step name and the optional 
parameters of the EXEC statement. For further details refer to the 
publication IBM System/360 Operating System: Job Control Language 
Reference. 
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Procedure Library 



Input Deck 




Figure 7. Using the EXEC Statement 




Figure 8. Modifying a Cataloged Procedure 



( 
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Naming the Step 

The stepname identifies a job step within a job. You must specify a 
stepname if later JCL statements refer to the step (see "Backward 
References" in the chapter "Coding Conventions") , or if the step is 
going to be part of a cataloged procedure or if you are going to perform 
step or checkpoint restart at or within the step. Otherwise, the 
stepname is optional. 

Note : It is recommended that you give a stepname to each step in your 
job because stepnames are used in many operating system messages and it 
would be easier for you to find out what part of your job causes the 
messages if you supply a stepname. (If the step is unnamed, the part of 
the message where the stepname would appear is left blank.) Also, it 
will save receding time if you decide at a later date to use backward 
references or to turn your JCL statements into a cataloged procedure. 

The stepname is coded in the name field of the EXEC statement. It 
can range from one to eight characters in length and can contain any 
alphanumeric or national (a,$,#) characters. However, the first 
character of the name must be a letter or national character and must 
begin in column 3. Each stepname in a job or procedure must be unique. 

The following are examples of step names in several EXEC statements: 




//STEP1 
//CHECK 
//A$9 
//LINKED IT 



EXEC... 
EXEC. . * 
EXEC... 
EXEC... 



Processing Program Information 

The main purpose of the EXEC statement is to identify either the program 
to be executed or the cataloged procedure to be used in the job step. 
The PGM parameter is used to identify the program to be executed. The 
PROC parameter is used to identify the cataloged procedure. You can 
also identify the cataloged procedure by simply coding its name as the 
first parameter in the operand field of the EXEC statement. 

The PGM parameter and the PROC parameter (or procedure name) are 
mutually exclusive. One of them must be coded in the EXEC statement. 

Your manager or supervisor should give you the names of the programs 
and cataloged procedures available in your installation. (Also, see 
Part III of this publication) . 

Some programs require special information for their processing. For 
example, you may have to let it know whether or not you want an output 
listing. You indicate your choices through the PARM parameter. 

Each program that requires them has a fixed set of options you can 
specify through the PARM parameter. The options required by IBM 
programs are listed in the publication associated with the program. 
(Also, see Part III of this publication. ) 
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PGM PARAMETER 

You must use the PGM parameter to indicate which processing program is 
to to be used in this job step and where this program resides. 
Processing programs can reside in three types of libraries (partitioned 
data sets) : 

1. The System library (SYSl. LINKLIB) 

2. Private libraries 

3. Temporary libraries 

The way you code the PGM parameter depends upon which type of library 
the program resides in- The PGM parameter must be the first parameter 
in the operand field. 

1. The system library is a partitioned data set named SYS1.LINKLIB. 
All IBM-supplied processing programs and, probably, the most 
frequently used programs written by your installation reside in 
SYSl. LINKLIB. The format of the PGM parameter for specifying 
programs that reside in SYSl. LINKLIB is: 

r 1 

| PGM=progname | 

L J 

Replace the term "progname" with the name or alias associated with 
the program. For example, the name of the FORTRAN H compiler is 
IEKAAOO, therefore, to request it you should code: 

//name EXEC PGM=IEKAAOO 

You can also refer to the program through its alias. For example, 
the name of the loader is IEWLDRGO and its alias is LOADER. You 
can request the loader with either one of these two statements : 

//name EXEC PGM=IEWLDRGO 



Not all programs have an alias. For example, your installation may 
have several levels of the linkage editor, but only one of them can 
have the alias IEWL. Your manager or supervisor should give you a 
list of the names and aliases of the processing programs in your 
installation. (Also, see Part III of this publication.) 

2. Private libraries are partitioned data sets that store programs not 
used sufficiently to warrant their inclusion in the system library 
( SYSl. LINKLIB) . For example, a set of programs that prepare 
quarterly sales tax reports could be placed in a private library. 
The format of the PGM parameter is the same as for programs in 
SYSl. LINKLIB: 

I ■ 1 

| PGM= prog name | 

L J 

Replace the term "progname" with the name or alias of the program. 

You indicate the fact that the program resides in a private library 

by inserting a special DD statement in your input deck. This DD 

statement defines the private library. You can name the DD 

statement either JOBLIB or STEPLIB. The JOBLIB DD statement 

specifies that the library is available to all steps in the job. 

The STEPLIB DD statement specifies that the library is available j 

only to this job step,. The use of these DD statements is explained ■ 

in "Special DD Statements" in the section "The DD Statement." ^ 
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3. Temporary libraries are temporary partitioned data sets created to 
store a program until it is used in a later job step of the same 
job. This type of library is particulary useful for storing the 
program output (load module) of a linkage editor run until it is 
executed by a later job step. The program stored in a temporary 
library is assigned a name by the system, which is not predictable 
by the programmer. Therefore, you use the PGM parameter to 
identify it by location rather than by name. You do this using the 
backward-reference feature of JCL (see "Backward References'* in the 
section "Coding Conventions".) The format of the PGM parameters 
for specifying programs that reside in temporary libraries is: 



j PGM= * . st epname . ddname 

L 



— 1 

I 
—J 




Replace the term "stepname" with the name of the EXEC statement of 
the job step (of the same job) where the temporary library is 
created. Replace the term "ddname" with the name of the DD 
statement that defined the library. The following example shows 
the EXEC statement for a link edit step, the DD statement in that 
step that defines the temporary library, and the EXEC statement 



//LINK EXEC PGM=IEWL 
//SYSLMOD DD 



This EXEC statement requests the 
linkage editor 

This DD statement defines the 
temporary library 



//GO 



EXEC PGM=*. LINK. SYSLMOD 



When the temporary library is created in a cataloged procedure 
step, (of the same job) you may want to call it in a later job step 
outside the procedure. In order to call it, you must give both the 
name of the job step that invokes the procedure and the procedure 
step name, i.e., PGM=*. stepname. proc stepname. ddname. 

calls a cataloged procedure named ASMFCL (ASMFCL is a cataloged 
statement that requests the execution of the program link edited with 
statement of the procedure step in ASMFCL where the temporary library is 
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J Input Deck 
| j 



//CALL EXEC ASMFCL 



stepname 

//GO EXEC PGM=*.CALL.LKED.SYSLMOD 

ddname 



Cataloged Procedure 



L J 



Programs residing in the system library or private libraries can also 
be executed by coding PGM=*. stepname. ddname, provided the named DD 
statement defines the program as a member of such a library. 

Note : If your DD statements request space allocation and disposition 
processing you can satisfy these requirements prior to executing your 
program (see the next chapter). To do this, write PGM=IEFBR14 instead 
of specifying your program's name. This also allows you to check the 
accuracy of your JCL statements. (If you create a data set when using 
this program, the data sets status will be OLD when you execute your own 
program. Make sure you change the DD statement to indicate this fact.) 



PROC OR PROCEDURE NAME PARAMETER 

Instead of executing a particular program a job step may use a cataloged 
or in-stream procedure. A cataloged or in-stream procedure can contain 
JCL statements for several steps, each of which executes a particular 
program. Cataloged procedures are members of the procedure library. 
(The IBM-supplied procedure library is named SYS1.PROCLIB; at your 
installation, there may be additional procedure libraries which would 
have different names.) 

The format of the PROC parameter is: 



j PROC=procedure name 

L 



Replace the term "procedure name" with the member name of the cataloged 
procedure or the name on the PROC statement of the in-stream procedure. 
If you prefer, omit "PROC" and simply code the procedure name. For 
example, you can request a cataloged procedure named COBFLG with either 
one of the following EXEC statements: 

The PROC parameter or the procedure name must be the first parameter 
in the operand field. 



< 
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Note: 



• Subsequent parameters in the operand field can be used to override 
EXEC statement parameters in the cataloged procedure. 

• Such parameters reflect a reference to cataloged procedure steps in 
their keywords. 

• For details on using and modifying cataloged or in-stream 
procedures, see "Part IV: Cataloged and In-stream Procedures." 



PARM PARAMETER 

Some IBM-supplied processing programs allow you to select alternatives 
from a set of options. For example, two of the options the FORTRAN G 
compiler gives you are: (1) whether or not a listing of the object 
module is to be printed, and (2) the number of lines in each page of the 
listing. Your choices are indicated by certain values given to the PARM 
parameter. For example, to indicate that you want a listing and that 
each page is to have 65 lines write PARM=(LIST, 'LINECNT=65* ) . 

Each IBM program that requires PARM information has a specific value 
for each of its options. For example, in the case of the FORTRAN G 
compiler, LIST specifies that a listing of the object module is to be 
printed. The PARM values are listed in the publication associated with 
the program and in Part III of this publication. 

In many cases, default values can be selected for PARM values during 
system generation. That is, the system programmer will select one 
alternative (e.g., LIST) or assign a fixed value to another (e.g., 
LINECNT=40) . The system will assume the default option unless you 
specify the other alternative or change the fixed value. For example, 
assume the defaults are LIST and LINECNT=40. If you want a listing of 
the object module that has 30 lines per page, write: 

If you do not want a listing, write: 

PARM=NOLIST (LINECNT is ignored because the listing will not be 

If you want a listing that has 40 lines per page, omit PARM and both 

Your manager or supervisor will tell you which default values were 
generated for the installation's operating system. 

The installation's processing programs or your own program can accept 
PARM values if the program is written in assembler language or PL/I. 
The system will place the PARM values in an area of main storage 
available to the program. You can then obtain these values by following 
the instructions in "Acquiring the Information in the PARM field of the 
EXEC Statement" in the publication IBM System/3 60 Operating System: 
Supervisor Services . GC28-6646, or in the publication IBM System/360 
Operating System: PL/I (F) Programmer's Guide . 

The format of the PARM parameter is: 

r ' n 

| PARM=value | 

L J 
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Replace the term "value" with up to 100 characters of data. The 
following are general rules for coding the PARM parameter: 

• If the value contains more than one expression separated by commas, 
the value must be enclosed in either apostrophes or parentheses. 

• If any of the expressions contain special characters,, you can either 
1) enclose that expression in apostrophes (5-8 punch) and the value 
in parentheses, or 2) enclose the entire value in apostrophes. (The 
enclosing apostrophes and parentheses are not considered part of the 
information and do not count towards the maximum of 100 characters 
of data; commas within apostrophes are passed as part of the 

PARM= ( DECK, , NAME=FIRST», LIST) or PARM=« DECK, NAME-FIRST, LIST 1 

• If the special character is an apostrophe, it must be shown as two 
consecutive apostrophes. For example show NAT'L as: 

When two apostrophes are coded only one is passed to the processing 
program. 

• If the special character is an ampersand and you are not defining a 
symbolic parameter, show the ampersand as two consecutive 

When two ampersands are coded, only one is passed to the processing 
program. 

• If there is only one value and the value does not contain special 
characters, you need not enclose the value in parentheses or 
apostrophes. If the value contains special characters enclose the 
value in apostrophes. For example: 

Since the value can consist of up to 100 characters, you may have to 
continue the value onto another card. If the value is to be continued, 
enclose the value in parentheses. Any value enclosed in apostrophes 
must be coded on one card. To continue the value, follow the 
continuation conventions as outlined in the topic "Continuing Control 
Statements" in the section "Coding Conventions". The continuation comma 
is considered part of the value field and counts towards the maximum of 
100 characters of data. The following is an example of continuing the 
value onto another card. 

When the job step uses a cataloged procedure, you can pass information 
to a step in the procedure by including as part of the keyword PARM, the 
procedure step name, i.e.,, PARM.procstepname. This specification 
overrides the PARM parameter in the named procedure step, if one is 
present. You can code as many parameters of this form as there are 
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steps in the cataloged procedure. For example, the following EXEC 
statement passes PARM information to two procedure steps of a cataloged 
procedure named PROCTWO. The names of the two procedure steps are STEPl 

//Al EXEC PROC*PROCTWO, PARM. STEPl =* (ONE, •TWO^B* , 

To pass information to the first step in a cataloged procedure and 
nullify all other PARM parameters in the procedure, code the PARM 
keyword without a procedure step name. For example: 



Installation Management Information 

Some installations have job step accounting routines in addition to the 
regular job accounting routines. Job step accounting is particularly 
useful in cases where a different programmer is assigned to write each 
step of a job, or where the installation's management wants to know how 
much time is spent on different functions such as compilation or link 
editing. 

You can specify job step accounting information instead of, or in 
addition to job accounting information. Job step accounting information 
is specified with the ACCT parameter in the EXEC statement. Job 
accounting information is specified with a positional parameter in the 
JOB statement (see the chapter "The JOB Statement"). 

ACCT PARAMETER 

The ACCT parameter allows you to supply job step accounting information. 
It has the following format: 

r • 1 

| ACCT=( accounting information) | 

L . J 

Replace the term "accounting information" with one or more subparameters 
separated by commas. Your manager or supervisor should tell you exactly 
how to code this parameter. The following are general rules for coding 
the accounting information: 

• The total number of characters of accounting information, plus the 
commas that separate the subparameters., cannot exceed 142. 

• If the list contains only one subparameter , you need not enclose it 
in parentheses. For example: 

• If any subparameter contains special characters (except hyphens), 
you can either 1) enclose the subparameter in apostrophes (5-8 
punches) and the value in parentheses, or 2) enclose the entire 
value in apostrophes. The apostrophes are not considered part of 
the information. For example: 

r ACCT* (12345,^/24*) or ACCT-* 12345, T/24* 
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• If the special character is an apostrophe, it must be shown as two 
consecutive apostrophes. For example, show O'COSCO as: 

When the job step uses a cataloged procedure, you can supply 
accounting information pertaining to a single procedure step by 
including, as part of the keyword ACCT, the procedure step name, i.e., 
ACCT.procstepname. This specification overrides the ACCT parameter in 
the named procedure step, if one is present- You can code as many 
parameters of this form as there are steps in the cataloged procedure. 
For example, the following EXEC statement passes job step accounting 
information to two procedure steps of a cataloged procedure named PR0C3. 

// '5/20/69'), ACCT. TWO=(LKED,'T. JONES' ,'5/20/69' ) 

To supply accounting information pertaining to all steps in a procedure, 
code the ACCT parameter without a procedure step name. This 
specification overrides all ACCT parameters in the procedure, if any are 

//BBB EXEC PR0C=PR0C3,ACCT= ( ' T.JONES ', ' 5/20/69' ) 



Processing Options 

There are two processing options available to the job step through EXEC 
statement parameters. 

The COND parameter specifies conditions for executing or bypassing 
the job step according to the success or failure of previous steps in 
the job. For example, if one of the steps in your job is an error 
analysis program, you would only want to execute it if there were errors 
in the preceding steps. 

The TIME parameter lets you set the maximum amount of time the step 
may use the CPU. This parameter lets you find out how long the job step 
uses the CPU and limits the CPU time wasted if the job step goes into a 
loop. 



COND PARAMETER 

Occasionally, some of the steps in a job may be unnecessary. For 
example, the last step of an inventory job might be to prepare reorder 
forms for depleted items. You would not want to execute this last step 
if one of the previous steps discovered that there were no missing 
items. The COND parameter of the EXEC statement lets you: 

• Make as many as eight tests on return codes issued by preceding job 
steps or cataloged procedure" steps, which completed normally. If 
any one of the tests is satisfied, the job step is bypassed. 

• Specify that the job step is to be executed even if one or more of 
the preceding job steps abnormally terminated or only if one or more 
of the preceding job steps abnormally terminated. 

The tests specified with the COND parameter of the EXEC statement are g 

performed in addition to the tests specified with the COND parameter of i 
the JOB statement. That is, the tests in the JOB statement are 
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performed first, and if any are met the job is discontinued regardless 
of what you specify in the EXEC statements. Using the COND parameter in 
both the JOB and EXEC statement allows you to set some conditions that 
apply to all steps in the job and other conditions that apply only to 
particular job steps. Abnormal termination (ABEND) of a job step 
normally causes subsequent steps to be bypassed and the job to be 
terminated. By means of the COND parameter, however, you can specify 
execution of a job step after one or more proceding job steps have 
abnormally terminated. For the COND parameter to be acted on, a job 
step must ABEND while the program has control. If a job step is 
abnormally terminated during scheduling, due to failures such as JCL 
errors or inability to allocate space, the remaining job steps are 
bypassed, no matter what you specified in any COND parameter. 

The format of the COND parameter of the EXEC statement is: 





(code , operator) 

( code,, operator , stepname) 

(code, operator, stepname. procstepname)] 

EVEN 
ONLY 



.) 



You can write the term ( code, opera tor [, stepname [.procstepname] ]) up to 
eight times,, or you can can write either EVEN or ONLY and the term 
(code , operator [ , stepname [ . procstepname] 3 ) up to seven times . 

Replace the term "code" with any decimal number from through 4 095. 



Replace the term "operator" with one of the following: 

GT (greater than) 

GE (greater than or equal to) 

EQ (equal to) 

LT (less than) 

LE (less than or equal to) 

NE (not equal to) 



Replace the term "stepname" with the name of the preceding job step 
that issues the return code to be tested. If you do not code a 
"stepname" the test indicated is performed on all preceding steps. When 
the return code is issued by a cataloged procedure step, you may want to 
test it in a later job step outside of the procedure. In order to test 
it, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e.,, COND=( (code, operator, 
stepname. procstepname),, . . . ) . 



COND= ( ( 20 , GT, STEP1) , ( 60 , EQ, STEP2 ) ) 

it would read "Bypass this step if 20 is greater than the return code 
issued by STEP1, or if STEP2 issues a return code of 60." 

COND=((20,GT,STEP1), (60, EQ)) 

it would read "Bypass this step if 20 is greater than the return code 
issued by STEP1, or if any of the preceding steps issues a return code 
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If you want only one test made, omit the outer parentheses, for example: 
COND=(10,LT) or COND=(15,NE, STEP5) 

COND= (7 ,LT, STEP4 . LINK) 

it would read "Bypass this step if 7 is less than the return code issued 
by a procedure step named LINK in the cataloged procedure called by an 

The EVEN and ONLY subparameters are mutually exclusive. Whichever 
subparameter you select can be coded in combination with up to 7 return 
code tests, and can appear before, between, or after return code tests, 

COND= (EVEN, <<+,GT,STEP3) ) 

COND=((15,GT,STEP4),EVEN, (30, EQ, STEP7 ) ) 

The EVEN subparameter causes the step to be executed even if one or 
more of the preceding job steps have abnormally terminated. However, if 
any return code tests specified in this job step are satisfied, the step 
is bypassed. The ONLY subparameter causes the step to be executed only 
if one or more of the preceding job steps have abnormally terminated. 
However, if any return code tests specified in this job step are 
satisfied, the step is bypassed. 

When a job step abnormally terminates, the COND parameter on the EXEC 
statement of the next step is scanned for the EVEN or ONLY subparameter. 
If neither is specified, the job step is bypassed and the EXEC statement 
of the next step is scanned for the EVEN or ONLY subparameter. If EVEN 
or ONLY is specified, return code tests, if any, are made on all 
previous steps specified that executed and did not abnormally terminate. 
The step is bypassed if any one of these tests is satisfied, or if one 
of the previous job steps abended because it exceeded the time limit for 
the job. Otherwise, the job step is executed. 

For example, if you write: 

it would read "Execute this step even if one or more of the preceding 

COND= (( 10, LT, STEPA), (20, EQ), ONLY) 

it would read, "Execute this step only if one of the preceding steps 
terminated abnormally but bypass it if 10 is less than the return code 
issued by STEPA or if any of the steps that terminated normally issued a 
return code of 2 0" . 



COND= ( (10 ,LT, STEPA) , ( 20 , EQ) # EVEN) 

it would read, "Bypass this step if 10 is less than the return code 
issued by STEPA, or if any of the preceding steps issues a return code 
of 20, otherwise execute this step even if one of the preceding steps 



< 
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If you omit the COND parameter, no return code tests are made and the 
step will be bypassed if any of the preceding job steps abnormally 
terminated. 

Any tests specified with the COND parameter of the JOB statement take 
precedence over those specified with EXEC statements. For example. 
Figure 9 shows an input deck with nine steps and the return codes 
produced by those steps that were executed. The following tests are 
performed: 



• Before STEP2 (STEP1 produced a return code of 6) : 

1. Is 10 less than 6? No. 

2. Is the return code 2 or 4? No. Execute STEP2 




• Before STEP3 (STEP2 produced a return code of 2) : 

2. Did one or more of the preceding steps terminate abnormally? 
No. Bypass STEP 3. 



T 1 

Return Code 



//MY JOB JOB A.SMITH,COND=(10,LT) 
//STEP1 EXEC PGM=AAA 



//STEP2 EXEC PGM=BBB,COND=((2, EQ), U, EQ)) 



//STEP3 EXEC PGM=CCC,COND=ONLY 



//STEP** EXEC PGM=DDD,C0ND=((5,GT,STEP1), (2,EQ)) 



//STEP5 EXEC PGM=EEE 



//STEP6 EXEC PGM= FFF, COND= ( ( 8 , GT # STEP 5 ) ,, EVEN ) 



//STEP7 EXEC PGM=GGG,COND=(4,GT,STEP4) 



//STEP8 EXEC PGM=HHH 



//STEP9 EXEC PGM=III,COND=ONLY 

i : 

Figure 9. Using the COND Parameter 



10 



12 
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Before STEP4 : 

1. Is 10 less than 2 or 6? No. 

2. Is 5 greater than 6? No. 

3. Is one of the preceding return codes equal to 2? 



Yes . Bypass 



• Before STEP5: 

1. Is 10 less than 2 or 6? 



No. Execute STEPS. 



Before STEP6 (STEP5 produced a return code of 9): 

1. Is 10 less than 9, 2, or 6? No. 

2. Is 8 greater than 9? No. 

3. Did one of the preceding steps terminate abnormally? 
Execute STEP 6. 



NO. 



• Before STEP7 (STEP6 produced a return code of 10): 

2. Is 4 greater than return code of STEP4? STEP4 was bypassed and 
did not produce a return code so this test is ignored. Execute 

• Before STEP8 (STEP7 produced a return code of 12): 

1. Is 10 less than 12, 10, 9, 2, or 6? Yes. Bypass STEP8 and 

Figure 10 is another example of the use of the COND parameter. This 
figure shows an input deck with nine steps and the return codes produced 
by those steps that were executed. The following tests are performed: 

• Before TWO (ONE produced a return code of 4) : 

2. Is 7 less than 4? No. Execute TWO. 

• Before THREE (TWO terminated abnormally) : 

3. Is 20 greater than 4? Yes. Bypass THREE. 



1. Is 5 equal to 4? No. 

2. Is EVEN or ONLY specified in FOUR? Yes. 

3. Are any of the preceding return codes equal to 3? No- 



Execute 



1. Is 5 equal to 6 or 4? No. 

2. Is 2 less than the return code of THREE? THREE was bypassed and 
did not produce a return code, so this test is ignored. 

3. Is EVEN or ONLY specified in FIVE? No. Bypass FIVE. 



• Before SIX: 

1. Is 5 equal to 6 or 4? No. 

2. Is EVEN or ONLY specified in SIX? 



No. Bypass SIX. 



1. Is 5 equal to 6 or 4? No. 

3. Is 6 equal to the return code of FIVE? FIVE was bypassed and 
did not produce a return code, so this test is ignored. Execute 

1. Is 5 equal to 5, 6, or 4? Yes. Bypass EIGHT and NINE. 



< 
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//ABC JOB 12345,COND=(5,EQ) 
//ONE EXEC PGM=A 



//TWO EXEC PGM=B, COND= ( 7 , LT) 



T 1 

Return Code 



ABEND 



//THREE EXEC PGM=C , COND= ( ( 2 # GT , ONE) , EVEN) 



//FOUR EXEC PGM=D,COND=< (3,EQ_) ,ONLY) 



//FIVE EXEC PGM=E, COND= ( 2 , LT , THREE) 



//SIX EXEC PGM=F 



//SEVEN EXEC PGM=G,COND=( (6,EQ,FIVE) ,ONLY) 



//EIGHT EXEC PGM=H,COND=EVEN 



//NINE EXEC PGM=I 




Figure 10. Using the COND Parameter with ABEND 

When the job step uses a cataloged procedure, you can establish 
return code tests and the EVEN or ONLY subparameter for a procedure step 
by including, as part of the keyword COND, the procedure step name, 
i.e., COND.procstepname. This specification overrides the COND 
parameter in the named procedure step, if one is present. You can code 
as many parameters of this form as there are steps in the cataloged 

To establish one set of return code tests and the EVEN or ONLY 
subparameter for all steps in a procedure, code the COND parameter 
without a procedure step name. This specification replaces all COND 
parameters in the procedure, if any are present. For example, 

//TEST EXEC PROai,COND=((7,LT,STEPl),(5,EQ)) 

The stepname you specify in the condition, for example, STEP2 in 
(5„EQ„STEP2) , can be the name of either a preceding procedure step in 
the cataloged procedure or of a preceding step in the job. Make sure 
you do not use the same stepnames for EXEC statements in your job as 
those used for procedure steps in any cataloged procedure used in that 
job. You can also test the return code produced by a procedure step of 
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another cataloged procedure used in the job. For example, if you want 
procedure step ST3 of the PROCB cataloged procedure bypassed when 10 is 
less than the return code produced by procedure step EDIT of a cataloged 

You can establish similar tests for all steps in the procedure by coding 
the COND parameter without a procedure step name. For example, if you 
want the entire PROCB cataloged procedure bypassed when 10 is less than 
the return code produced by step EDIT of a cataloged procedure called by 
the EXEC statement named TWO, code: 

Notes: 

• When a job step that contains the EVEN or ONLY subparameter 
references a data set that was to be created or cataloged in a 
preceding step, the data set (1) will not exist if the step creating 
it was bypassed, or (2) may be incomplete if the step creating it 
abnormally terminated. 

• It is meaningless to specify the COND parameter for the first step 
of a job. 

TIME PARAMETER 

The TIME parameter specifies the maximum amount of time a job step or 
cataloged procedure step may use the CPU. Two benefits of the TIME 
parameter are that it allows you to find out how long the step uses the 
CPU (CPU time appears on the output listing) and it helps limit the CPU 
time wasted by a step that goes into a loop. Normally, a job step that 
exceeds its time limit is terminated. However, if the System Management 
Facilities option is included in the CPU system and a user exit routine 
is provided, this routine can extend the time limit so that processing 
can continue. (The System Management Facilities option and user exit 
routines to be used with it are discussed in the publication IBM 
System/360 Operating System: System Programmer's Guide . ) 

The format of the TIME parameter is: 

1 



j TIME= ( [minutes] [, seconds ] ) 

L . J 

Replace the term "minutes" and "seconds" with the maximum number of 
minutes and seconds that the step can use the CPU. The number of 
minutes must be less than 1440 (24 hours); the number of seconds must be 
less than 60* That is, the maximum time you can specify is 
TIME=(1439,59). 

If the job step may require use of the CPU for more than 1439 
minutes,, code TIME=1440 to eliminate the time limit. You must not code 
TIME=0. 

If the CPU time limit is given in minutes only, you need not code the 
parentheses. For example, TIME=12. If the CPU time limit given is 
seconds only, you must code both the parentheses and a comma to indicate 
the absence of minutes. For example TIME=(,30). 

If you omit the TIME parameter, the default CPU time limit for a job 
(as established in the cataloged procedure for the input reader) is 
assumed. 
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Coding TIME=1440 also lifts the restrictions on the amount of time a 
job step may remain in a wait state. If the System Management 
Facilities option is included in the system, the installation determines 
this time limit. In this case, a job step remaining in a wait state for 
more than the established time limit causes termination of the job 
unless a user-provided exit routine extends the wait- state time limit 
for that step. If the System Management Facilities option is not 
included, the system automatically provides a 30-minute time limit for 
wait states; that is, a job step remaining in a wait state for more than 
30 consecutive minutes causes termination of the job. If the job step 
should be allowed to remain in a wait state for more than the 
established time limit, code TIME=1440 to eliminate the time limit. 

When the job step uses a cataloged procedure, you can set a CPU time 
limit for a single procedure step by including, as part of the keyword 
TIME-, the procedure step name, i.e., TIME.procstepname. This 
specification overrides the TIME parameter in the named procedure step, 
if one is present. You can code as many parameters of this form as 
there are steps in the cataloged procedure. For example, the following 
EXEC statement sets a time limit for two procedure steps of a cataloged 
procedure named PR0C5. The name of the procedure steps are ABC and DEF. 

//AAA EXEC PROC5,TIME.ABC=20,TIME.DEF=(3,40) 

To set a CPU time limit for an entire procedure, code the TIME parameter 
without a procedure step name. This specification overrides all TIME 
parameters in the procedure if any are present. For example: 

//AAA EXEC PROC5,TIME=20 



Queuing Option (Systems With MVT Only) 

The DPRTY parameter allows you to specify a dispatching priority for the 
job step. For further information on dispatching priority, refer to 
"Task Priority" in the publication IBM System/360 Operating System: 
Supervisor Services , GC28-6646. 



DPRTY PARAMETER (SYSTEMS WITH MVT ONLY) 
The format of the DPRTY parameter is : 

r t 

| DPRTY=( [value j.] [, value 2 ]) | 

L J 

Replace both "value^." and "value 2 " with a number from through 15. The 
system uses the following formula to form the dispatching priority: 

| (valuej.xl6) + value 2 =dispatching priority 

If you do not assign a number to "value^." , a default value of is 
assumed. If you omit "value A " you must code both the parentheses and a 
comma preceding "value 2 n to indicate the absence of "value^". For 
example, if you code: 

a value of DPRTY=(0,5) is assumed. 
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If you do not assign a number to "value 2 % a default value of 11 is 
assumed. If you omit "value 2 " you need not code the parentheses. For 

a value of DPRTY=(7,11) is assumed. 

If you omit the DPRTY parameter, the job step is assigned the 
priority you specified for the entire job either with the PRTY parameter 
of the JOB statement, or by default. 

Whenever possible, you should avoid assigning a number of 15 to 
w value i H . This number is used for certain system functions. 

When this step uses a cataloged procedure, you can assign a 
dispatching priority to a single procedure step by including, as part of 
the DPRTY parameter, the procedure step name, i.e., DPRTY. procstepname. 
This specification overrides the DPRTY parameter in the named procedure 
step, if one is present. You can code as many parameters of this form 
as there are steps in the cataloged procedure. For example, the 
following EXEC statement is used to establish a dispatching priority for 
two procedure steps of a cataloged procedure named PR0C6. The names of 

//STEP9 EXEC PROC6,DPRTY.UP=(,8),DPRTY.DOWN-(4,6) 

To assign a single dispatching priority to an entire cataloged 
procedure, code the DPRTY parameter without a procedure step name. This 
specification overrides all DPRTY parameters in the procedure, if any 

Note : If your installation provides time-slicing facilities in a system 
with MVT,, the DPRTY parameter can be used to make a job step part of a 
group of job steps to be time-sliced. At system generation, the 
priorities of the time-sliced groups are selected. If the number 
assigned to value 1 corresponds to a priority number selected for 
time-slicing and value 2 is either omitted or assigned a value of 11, 
then the job step will be time-sliced. 



Main Storage Options (Systems With MVT Only) 

MVT processes several jobs at the same time in different regions of main 
storage. The size of each region depends on the requirements of each 
job. Once the processing of that job is completed, the system uses that 
space for other jobs. (The free space can be subdivided into smaller 
regions,, used as is for a region the same size, or combined with 
adjacent free space for a larger region. ) 

Usually you assign a region size through the REGION parameter of the 
JOB statement as described in the preceding chapter. In this case each 
step of the job will be executed in that region. You can, however, 
specify a different region size for each step in the job using the 
REGION parameter of the EXEC statement. This is desirable in cases 
where different steps need a greatly different region size. For example 
one step of your job may need 16K while another may need 128K. If you 
do not specify a region size for each step, there would be 112K unused 
while the first step is executed. Had you specified a region size for 
each step, MVT could use those 112K for executing other jobs while your 
first step is executed. 
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Regions are contiguous areas of main storage. However, you can 
define a two-part region if your operating system was generated with 
"main storage hierarchy support" . Main storage hierarchy support 
provides for storage hierarchies and 1. If IBM 2361 Core Storage, 
Model 1 or 2, is present in the system, processor storage is referred to 
as hierarchy and 2361 core storage is referred to as hierarchy 1. 

If 2361 Core Storage is not present but main storage hierarchy 
support was specified during system generation, a two-part region is 
established in processor storage when a region is defined to exist in 
two hierarchies. The two parts are not necessarily contiguous. 

The REGION parameter allows you to specify the region size to be used 
by your job step. 

Notes : 

• If you have specified a REGION parameter in the JOB statement, 
REGION parameters on the JOB'S EXEC statements are ignored. 

• In systems without main storage hierarchy support, processor storage 
is referred to as main storage. In systems with main storage 
hierarchy support, main storage comprises both processor storage 
(hierarchy 0) and 2361 core storage (hierarchy 1) . 

Sometimes a job step will run out of space in its region. Normally, 
this means that the step is terminated. However, if the rollout/rollin 
option was generated for your MVT system, the system can obtain more 
space for your job step. This is accomplished by "rolling out" another 
job step that is currently being executed and allocating its region to 
your job step. After processing of your step is ended,, the rolled-out 
step is "rolled in" and its processing continues. 

The ROLL parameter lets you specify whether the job steps in your job 
can be rolled out and whether they can cause roll out of other job 
steps. 

Note : ROLL parameters coded on EXEC statements are superseded by a ROLL 
parameter coded on the JOB statement. 




REGION PARAMETER (SYSTEMS WITH MVT ONLY) 
The REGION parameter allows you: 

1. To request the maximum amount of main storage to be allocated to 
the job step. This figure must include the size of those 
components that are required by your program and are not resident 
in storage. 

2. To request the amount of main storage to be allocated to the job 
step and in which storage hierarchy or hierarchies the space is to 
be allocated. This request should be made only if main storage 
hierarchy support is specified during system generation. 

The storage requirements you must consider when specifying a region 
size are outlined in the publication IBM System/360 Operating System: 
Storage Estimates . 

1. The format of the REGION parameter for systems without storage 
hierarchies is : 



r 1 

j REGION=valueK | 

1 . J 
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Replace the term "value" with the number of contiguous 1024-bytes 

areas you want allocated to the jobstep, for example, REGION=52K. 

This number can range from one to five digits but cannot exceed 

16383. It should be specified as an even number. (If you specify i 

an odd number, the system treats it as the next highest even " 

number.) 

If you omit the REGION parameter, the default value (as established 
in the input reader procedure) is assumed. 

When the job step uses a cataloged procedure, you can request a 
region size for a single procedure step by including, as part of 
the REGION parameter, the procedure step name, i.e., 
REGION. procstepname. This specification overrides the REGION 
parameter in the named procedure step, if one is present. You can 
code as many parameters of this form as there are steps in the 
cataloged procedure. For example, the following EXEC statement is 

procedure named PR0C7. The names of the procedure steps are LITTLE 

To request a single region size for an entire cataloged procedure, 
code the REGION parameter without a procedure step name. This 
specification overrides all REGION parameters in the procedure, if 
any are present. For example, 

2. The format of the REGION parameter for systems with storage 

hierarchies is; / 

i 1 

j REGION= ( [value K] Uvalue^K]) | 

L J 

Replace the term "value " with the number of contiguous 1024-byte 
areas you want allocated to the job step in hierarchy (processor 
storage); replace the term "value^" with the number of contiguous 
1024-bytes areas to be allocated in hierarchy 1 (2361 storage), 
e.g., REGION=(60K, 200K) . Each value specified should be an even 
number. (If you specify an odd number, the system treats it as the 
next highest even number.) 

The following rules apply to the hierarchy sizes: 

• If 2361 Core Storage is not present but main storage hierarchy 
support was specified during system generation, a two-part 
region is established in processor storage when a region is 
defined to exist in two hierarchies. The two parts are not 
necessarily contiguous. In this case, the sum of value and 
value^ cannot exceed 16383. For example, REGION=(10K,4K) . 

• If 2361 Core Storage is present, value , cannot exceed 16383,, 
and value^ cannot exceed 1024 if using a single Model 1, or 
2048, if using a single Model 2. 

• If main storage hierarchy support was not generated and regions 
are requested in both hierarchies, the region sizes are 

combined and an attempt is made to allocate a single region ^ 

from processor storage. If a region is requested entirely from ■ 
hierarchy 1, no hierarchy segment is allocated. ™ 
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In systems with main storage hierarchy support, you can omit either 
subparameter, thereby requesting storage in only one hierarchy. If 
you are requesting storage only in hierarchy 1, you must code a 
comma to indicate the absence of the first subparameter, for 
example, REGION=( f 52K) . If you are requesting storage only in 
hierarchy f you need not code the parentheses, for example, 
REGION=70K. 



If you omit the REGION parameter, the default value (as established 
in the input reader procedure) is assumed. When the default region 
size is assumed, storage is always allocated in hierarchy 0. 

When the job step uses a cataloged procedure, you can request a 
region size for a single procedure step by including, as part of 
the region parameter, the procedure step name i.e., 
REGION. procstepname. This specification overrides the REGION 
parameter in the named procedure step, if one is present. You can 
code as many parameters of this form as there are steps in the 
cataloged procedure. For example, the following EXEC statement is 
used to assign region sizes to two procedure steps of a cataloged 
procedure named PROC8. The names of the procedure steps are FIRST 




//HIER EXEC PROC8,REGION.FIRST=U0K,20K), 
// REGION.SECOND-(,32K) 



To request a single region size for an entire cataloged procedure, 
code the REGION parameter without a procedure step name. This 
specification overrides all REGION parameters in the procedure, if 
any are present. For example: 

//HIER EXEC PROC=PROC8,REGION=(40K,32K) 

Note : If you have specif ed a REGION parameter on the JOB statement, 
REGION parameters on the job's EXEC statements are ignored. 



ROLL PARAMETER (SYSTEMS WITH MVT ONLY) 

The function of rollout/roll in is to allocate additional main storage to 
a job step whose own region contains no more available space. In order 
to allocate this additional main storage to a job step, another job step 
may have to be rolled out,, i.e., temporarily transferred to secondary 
storage. The ROLL parameter allows you to indicate whether or not your 
job step can be rolled out and whether or not it can cause rollout of 
other job steps. 



The format of the ROLL parameter is: 



| ROLL=(x,y) 

l 



The "x" declares the job step's ability to be rolled out. If "x" is 
YES, the job step can be rolled out; if "x" is NO, the job step cannot 
be rolled out. The "y" declares the job step's ability to cause rollout 
of another job step. If "y" is YES, the job step can cause rollout; if 
"y" is NO, the job step cannot cause rollout. (YES must be specified if 
you want additional main storage allocated to the job step if it is 
required.) If you include the ROLL parameter, both the "x" and "y" 
subparameters must be coded. 

For example, ROLL=(NO,YES) indicates that the job step cannot be 
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When the job step uses a cataloged procedure, you can indicate 
whether or not a single procedure step has the ability to be rolled out 
and to cause rollout of another job step. To indicate this, include, as 
part of the ROLL parameter, the procedure step name, i.e., 
ROLL.procstepname. This specification overrides the ROLL parameter in 
the named procedure step, if One is present. You can code as many 
parameters of this form as there are steps in the cataloged procedure. 
For example, the following EXEC statement is used to assign roll 
conditions to two steps of a cataloged procedure named PR0C9. The names 

//ROLLER EXEC PRO C9, ROLL. HOT= (NO, YES) , 



To indicate whether or not all of the steps of a cataloged procedure 
have the ability to be rolled out and to cause rollout of other job 
steps, code the ROLL parameter without a procedure step name. This 
specification overrides all ROLL parameters in the procedure, if any are 
present. For example: 

If this parameter is omitted, the default specified in the reader 
procedure is used. In the IBM-supplied reader procedures,, the default 
specified is ROLL=(YES,NO) . 

Notes : 

• Roll parameters coded on EXEC statements are superseded by a ROLL 
parameter coded on the JOB Statement. 

• Teleprocessing jobs that use the autopoll option should not have the 
ability to be rolled out. A rolled out job using this option cannot 
be restarted properly. Therefore, you should always code 
ROLL=(NO,YES) or ROLL=(NO,NO) for this kind of job. 



Checkpoint/Restart 

When a job step abnormally terminates (ABEND), you may have to resubmit 
the job for execution. This means lost computer time and a delay in 
obtaining the desired results. To reduce these effects, you can use the 
restart facilities of the operating system provided your program is 
written in the assembler language, COBOL, or PL/1. 

If a job step abnormally terminates or if a system failure occurs, 
the restart facilities allow you to request that the job step be 
restarted automatically either at the beginning of the step (step 
restart) or within the step (checkpoint restart) . Automatic restarts 
are specified with the RD parameter of the EXEC statement. 

For detailed information on the checkpoint/restart facilities, using 
the assembler language refer to the publication IBM System/360 Operating 
System: Supervisor Services ; using COBOL, to IBM System/360 Operating 
System: COBOL (E) Programmer's Guide, o r to IBM System/360 Operating 
System: COBOL (F) Programmer's Guide , or to IBM System/360 Operating 
System: American National Standard COBOL Programmer's Guide ; using 
PL/1, to IBM System/360 Operating System: PL/1 (F) Programmer's Guide ; 
and also to "Appendix C: ^Usmg the Restart Facilities" of this 
publication and to the publication IBM System/360 Operating System: 
Advanced Checkpoint/Restart Planning Guide . GC28-6708. 
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RD PARAMETER 

A job can be automatically restarted at the beginning of the job step 
that abnormally terminated (step restart) or within the step (checkpoint 
restart). In either case, automatic restart can occur only if: 

1. you use the RD parameter to request restart, 

2. the return code returned during abnormal termination indicates that 
the step is eligible for restart, and 

3. the operator authorizes restart. 

In order for checkpoint restart to occur, the CHKPT macro instruction 
(assembler), or the RERUN clause (COBOL), or the CALL IHECKPT statement 
(PL/1) must have been executed in your processing program prior to 
abnormal termination. Through the RD (restart definition) parameter, 
you can specify that step restart can occur or that the action of the 
CHKPT macro instruction (assembler), or the RERUN clause (COBOL), or the 
CALL IHECKPT statement (PL/1) is to be suppressed. 

The format of the RD parameter is : 




RD=request 



Replace the work "request" with: 



R 
NC 



to permit automatic step restart 

to suppress the action of the CHKPT macro instruction, or 
RERUN clause, or CALL IHECKPT statement, and not permit 
automatic restart 



NR 



RNC 



to request that the CHKPT macro instruction, or RERUN clause, 
or CALL IHECKPT statement be allowed to establish a 
checkpoint, but not to permit automatic restart 

to permit step restart and to suppress the action of the CHKPT 
macro instruction, or RERUN clause, or CALL IHECKPT statement. 



Each of these requests is described in more detail in the following 
paragraphs . 

RD=R : If the processing programs used by this job step do not include 
any CHKPT macro instructions, (assembler), or RERUN clause (COBOL), or 
CALL IHECKPT statements (PL/1), RD=R allows execution to be resumed at 
the beginning of this step if it abnormally terminates. If any of these 
programs do include one or more CHKPT macro instructions, or RERUN 
clauses, or CALL IHECKPT statements step restart can occur if a step 
abnormally terminates before execution of a CHKPT macro instruction or 
RERUN clause, or CALL IHECKPT statement; thereafter, checkpoint restart 
can occur. If you cancel the effects of the CHKPT macro instructions or 
RERUN clauses, or CALL IHECKPT statements before a checkpoint restart is 
performed, the request for automatic step restart is again in effect. 

RD=NC or RD=RNC : RD=NC or RD=RNC should be specified when you want to 
suppress the action of all CHKPT macro instructions (assembler), or 
RERUN clauses (COBOL),, or CALL IHECKPT statements (PL/1) included in the 
programs used by this step. When RD=NC is specified, neither step 
restart nor checkpoint restart can occur. When RD=RNC is specified, 
step restart can occur. RD=NC has no effect on processing if CHKPT 
macro instructions, or RERUN clauses, or CALL IHECKPT statements are not 
included in the program. 
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RD=NR ; RD=NR permits a CHKPT macro instruction (assembler), or RERUN 
clause (COBOL), or CALL IHECKPT statement (PL/1) to establish a 
checkpoint, but does not permit automatic step or checkpoint restarts. 
Instead, at a later time, you can resubmit the job and begin execution 4 
at a specific checkpoint. (The RESTART parameter of the JOB statement " 
is used for resubmitting a job for restart. See "Checkpoint/restart" in 
the chapter "The JOB Statement" . ) This parameter has no effect on 
processing if CHKPT macro instructions, RERUN clauses, or CALL IHECKPT 
statements are not included in the program. 

If automatic restart is requested for an abnormally terminated step 
and restart is authorized by the operator, special disposition 
processing is performed. If automatic step restart is to occur, all 
data sets in the restart step with a status of OLD or MOD, and all data 
sets being passed to steps following the restart step are kept. All 
data sets with a status of NEW in the restart step are deleted. If 
automatic checkpoint restart is to occur, all data sets currently in use 
by the job are kept. (For further information on data set dispositions 
refer to the section "The DD Statement'* and to "Appendix C: Using the 
Restart Facilities." 

If you omit the RD parameter and no CHKPT macro instructions, or 
RERUN clauses, or CALL IHECKPT statements are executed, automatic 
restart cannot occur. If you omit the RD parameter but one or more 
CHKPT macro instructions or RERUN clauses, or CALL IHECKPT statements 
are executed, automatic checkpoint restart can occur. 

When this job step uses a cataloged procedure, you can make a restart 
request for a single procedure step by including, as part of the RD 
parameter, the procedure step name, i.e., RD.procstepname. This 
specification overrides the RD parameter in the named procedure step, if 
one is present. You can code as many parameters of this form as there 
are steps in the cataloged procedure. 

For example, the following EXEC statement requests restart for two ' 
steps of a cataloged procedure named PROC10. The names of the procedure 

//ASTEP EXEC PROC10,RD.FIVE-R,RD.NINE=NC 

To specify a restart request for an entire cataloged procedure,, code 
the RD parameter without a procedure step name. This specification 
overrides all RD parameters in the procedure, if any are present. 

Notes ; 

• If you specify the RD parameter on the JOB statement, RD parameters 
on the job's EXEC statements are ignored. 

• When using a system with MVT, MSGLEVEL= (1,0) or MSGLEVEL= (1, 1) must 
be coded on the JOB statement. If you omit this parameter, restart 
is not performed. 

• If restart is requested for this step, assign each step a unique 
step name. (Upon restart, the system searches the name field for 
the corresponding name of the abnormally terminated step. If two 
steps have the same name, restart is attempted at the first step 
encountered with the corresponding name regardless of whether or not 
this is the step that abnormally terminated.) Step names are 
assigned in the name field of the EXEC statement for each step. 

• If restart occurs, the CPU time limit assigned to the step with the ^ 
TIME parameter is restored to its original value. ■ 
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The DD Statement 



There must be a DD statement for each data set used in your job step. 
DD statements follow the EXEC statement that marks the beginning of the 
job step. You can include a maximum of 255 DD statements in each job 
step. 

The main functions of the DD statements are to describe the 
characteristics of data sets and to indicate their location. These 
functions allow you a great deal of freedom in writing your program. 
For example, if you are writing a program to process paid bills, you do 
not have to indicate in your program the size of the input records, or 
the type of device in which they are located. You can postpone these 
definitions until you run the program when you must write the DD 
statement for the input data sets. You can debug your program, and then 
run it several times with different DD statements for the input record 
data set. In that way you can determine which record size is most 
efficiently processed, whether the input should come from a card reader 
or a magnetic tape unit. All your program needs to know to refer to the 
data set is the name of the DD statement (ddname) that describes the 
data set. Each time you execute the program you can use the DD 
statement to describe a different data set as long as the ddname remains 
constant. (Refer to "Section 3 : Data Management" in the publication 
IBM System/360 Operating System: Concepts and Facilities for a summary 
of the data management concepts you must know before reading this 
chapter on the DD statement. ) 

You can, however, define data set characteristics within your program 
so that you will not have to specify those characteristics that remain 
constant each time you use a data set. The number and type of data set 
characteristics you can specify in your program rather than in the DD 
statement depends on the language you are using for writing your 
program. For example, the assembler language allows you to specify more 
data set characteristics in your program than the FORTRAN language. 
However, regardless of the facilities of the language you are using, you 
should only specify those requirements essential to processing in your 
program and leave the rest for the DD statement. This gives you more 
flexibility in writing the program and places fewer restrictions on any 
future changes you may have to make to the program. 

All job steps in your job (except those steps that use a cataloged 
procedure) require DD statements because every program must have either 
an input data set, or an output data set, and, in many cases, work data 
sets in order to operate. The names of the DD statements required for 
IBM-supplied programs, such as compilers and utilities, are predefined 
and you must code their parameters according to the rules stated in the 
publications associated with the programs . (A summary of JCL statements 
for compilers, linkage editors, and loader appears in Part III of this 
publication. ) 

Only you can determine the DD statements required for your own 
program. In general, you will need one DD statement for each data set 
defined with: 

• A data set number if you are using ALGOL. 

• A DCB macro instruction if you are using the assembler. 

• An FD entry if you are using COBOL. 

• A data set reference number if you are using FORTRAN. 

• The TITLE option or file name if you are using PL/1. 
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You will need more than one DD statement for each data set in the two 
following cases: 

i 

1. Definition and retrieval of index sequential (ISAM) data sets may ^ 

require up to three DD statements, 

2. Several input data sets, each defined by a different DD statement, 
may be read as if they were a single data set through the technique 
of concatenation. 

In both cases, only the first DD statement is given a ddname. 

If the job step uses a cataloged procedure, you can use a DD 
statement either to override parameters in a DD statement in the 
procedure, or simply, to add a new DD statement to the procedure. In 
both cases, the modification remains in effect only for the duration of 
the job step, it does not change the procedure permanently. 

A DD statement must contain the term DD in its operation field. 
Although all parameters in the DD statement's operand field are 
optional, a blank operand field is invalid, except when you are 
overriding DD statements defining concatenated data sets in a cataloged 
procedure. (See "Overriding, Adding and Nullifying Parameters on a DD 
Statement" in Part IV of this publication. 

The parameters in the operand field allow you to specify five types 
of optional information: 

1. Data set information. 

2. Location of the data set. 

3. Size of the data set. 

4. Data attributes. I 

5. Special processing options. ' 

Table 6 shows the parameters used for each type of information and their 
functions. 

As you can see, not all parameters are needed to define a data set. 
In fact, some combinations of parameters cannot be used in the same DD 
statement. 

The valid combination of DD statement parameters allow you to perform 
the following functions: 

1. Create a data set: 

a. on unit record devices (card punch or printer) 

b. on system output devices 

c. on magnetic tape 

d. on direct access devices 

2. Retrieve an existing data set: 

a. from unit record devices (card reader or paper tape reader) 

b. from input stream 

c. passed data set (from magnetic tape or direct access) 

d. cataloged data set (from magnetic tape or direct access) 

e. kept data set (from magnetic tape or direct access) 

3. Extend an existing data set: 

a. passed data set (from magnetic tape or direct access) j 

b. cataloged data set (from magnetic tape or direct access) m 

c. kept data set (from magnetic tape or direct access) ^ 
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4. Define special data sets: 

a. private libraries 

b. dump data sets 

c. checkpoint data set 

5. Postpone definition of a data set 

This chapter describes the ddname and the parameters needed for each 
of the above functions. The sections that describe each of the 
functions are self-contained. For example, the section on how to create 
a data set on magnetic tape contains full descriptions of all the 
parameters (and their appropriate subparameters) needed for this 
function. Self-contained sections eliminate ambiguity in the use of 
parameters, but lead to some repetition in the text. For this reason, a 
summary of the DD statement is given in Appendix D. This appendix shows 
the correct formats of the parameters for each of the functions without 
textual descriptions. 

Note : Some devices, such as graphics devices, are not discussed in this 
manual. For information on how to specify IBM devices not described in 
this manual, refer to IBM System/360 Operating System; Job Control 
Language Reference . 
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Table 6 

r 



DD Statement Parameters (Part 1 of 2) 



-|— - — T" 

|P/K| 



h- 



Type 



| Parameter | 



Function 



Comments 



Data Set 
Information 



| 

DISP 



DSNAME 
(or DSN) 



Names the data set. If 
omitted, the data set 
is considered to be 
temporary. 



K 



Specifies the current 
status of the data set 
and whether or not it 
will be retained after 
the job step. 



K 



H 



Location of 
the Data 
Set 



UNIT 



Specifies the type of 
device to be used for 
the data set. 



K 



I 

VOLUME 
(or VOL) 



Describes the volume 
on which the data set 
resides. 



* 



K 



h 



LABEL 



Describes the volume 
label . 



For magnetic tape or 
direct access devices 
only. 
, 



For magnetic tape or 
direct access devices 
only. 



SYS OUT 



Routes a data set 
through the output 
stream. 



K 



Indicates that the 
data set is in the 
input stream. 



~+ 



Only one of these 
parameters can be 
used in a DD state- 
ment. 



DATA 



Size of the 
Data Set 



+ 

SPACE 



Indicates that the 
data set is in the 
input stream and that 
it contains JCL state- 
ments to be treated as 
data. 

Requests space on 
direct access devices. 



H 






1 

Only one of these 
parameters can be 
used in a DD state- 
ment. 



Data 
Attributes 



SPLIT 
SUBALLOC 



+ 

DCB 



Used to split cylin- 
ders between data sets 

Specifies that the 
data set shares direct 
access space with 
other data sets. 

Specifies the data 
attributes not speci- 
fied in your process- 
ing program. 



K 



— 1 
K 

— 1 
K 



K 






< 
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Table 6. DD Statement Parameters (Part 2 of 2) 



j Type 

I 

Special 

Process 
Options 



■T T 

| Parameter 



ing 



1 

DYNAM 



SEP 



AFF 



DUMMY 



DDNAME 



UCS 



OUTLIM 



J. 

| TERM 



1 



Function 



1 



P/K 



Comments 



Requests that the data 
set be assigned a 
separate channel from 
the ones assigned to 
earlier data sets. 



Requests the same 
separation require-*- 
ments as a previous DD 
statement that used 
the SEP parameter. 



Indicates that I/O 
operations are to be 
bypassed for this data 
set. Commonly used 
while debugging a 
program. 



Specifies that dynamic 
allocation of data 
sets is to be used. 
Defers definition of 
data sets until they 
are needed. 



Postpones the defini- 
tion of a data set. 
Useful in cataloged 
procedures. 



Requests a particular 
chain in a 14 03 print- 
er with the universal 
character set feature. 



Specifies a limit for 
the number of logical 
records included in 
the output data set 
being routed through 
the output stream. 



~+ 



K 



K 



H 



K 



K 



K 



Only one of these 
parameters can be 
used in a DD state- 
ment. 



Meaningful only in 
systems with MVT and 
TSO. For Systems 
with MFT or MVT 
without TSO, DYNAM 
means same as DUMMY. 



You may code only the 
DCB subparameters 
BLKSIZE and BUFNO 
with the DDNAME 
parameter . 



The OUTLIM parameter 
is ignored unless 
SYSOUT is coded in 
the operand field of 
the same DD state- 
ment. 



Specifies that an 
input or output data 
set is coming from or 
going to a time 
sharing terminal. 



K 



| For systems with MVT 
land TSO (Time Sharing 
] Option) only. 



Legend: P = Positional Parameter 
K = Keyword Parameter 
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Naming the DD Statement 

The ddname identifies the DD statement so that subsequent JCL statements 
and the processing program can refer to it. The following rules apply 
to the ddname: 

1. Only the first DD statement of a group of DD statements that define 
an indexed sequential (ISAM) data set must have a ddname. The name 
field of the other DD statements in the group must be left blank. 

2. Only the first DD statement of a group of DD statements that define 
concatenated data sets must have a ddname. The name field of the 
other DD statements in the group must be left blank. 

3. All other DD statements must have ddnames. 

Each ddname within a jobstep should be unique. If duplicate ddnames 
exist, all I/O references are directed to the first such DD statement in 
the job step. 

The ddname is coded in the name field of the DD statement. It can ^ — 

range from one to eight characters in length and can contain any ( Ddname 
alphanumeric or national (a,$,#) characters. However, the first V 
character of the name must be a letter or national character and must be 
in column 3. The following are examples of ddnames in several DD 
statements. 




//DD1 


DD. .. 


Y/SYSIN 


DD . . . 


//FILE 


DD. . . 


V/AREA25 


DD... 


//#103 


DD. . . 


V/FT31F001 


DD.. . 



The ddnames used by IBM processing programs are predetermined and you 
must code them as shown in the publications associated with the 
programs, and in Part III of this publication. 

If you code your program in ALGOL or FORTRAN you must use certain 
ddnames for your data sets. The format of the ddnames is: 

ALGLDDnn (ALGOL) 
FTnnFOOl (FORTRAN) 

where nn is the data set reference number. For further information 
refer to the programmer's guide for the language you are using. 

The ddnames JOBLIB,STEPLIB,SYSABEND,SYSUDUMP, and SYSCHK are reserved 
for special system facilities. These ddnames are described in "Special 
DD statements" later on in this section. 

If your job step uses a cataloged procedure, the ddname must be 
qualified by the procedure step name, i.e., pro est epname. ddname. The 
ddname can identify either a DD statement in the procedure whose 
parameters you want to override, or a new DD statement you want to add 
to the procedure. (In both cases, the modification remains in effect 
only for the duration of the job step; it does not change the procedure 
permanently.) For example, suppose you are using a cataloged procedure 
named PROCTWO. The PROCTWO procedure has tw"o procedure steps named 
FIRST and SECOND. You want to change a DD statement named OUTPUT in 
FIRST and add a DD statement named DATA to SECOND. Therefore you would 

//name EXEC PROC=PROCTWO 
//FI RST . OUTPUT DD . . . 
//SECOND. DATA DD. . . 
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NOTES 




C 



Ddname 
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Table 7. Parameters for Creating a Data set 



Device 


Parameter Type 


Parameter 


Comments 


Unit 

Record 

Devices 


Location of the Data Set 


UNIT 


Required 


Data Attributes 


DCB 


Optional 


Special Processing Options 


UCS 


Optional (for a printer with the universal character set feature) 


FCB 


Optional (for 3211 printer if forms control information is to be specified) 


DUMMY 


Optional 


System 
Output 
Devices 


Location of the Data Set 


SYSOUT 


Required. Specifies the output class 


UNIT 


Optional 


Size of the Data Set 


SPACE 


Optional 


Data Attributes 


DCB 


Optional 


Special Processing Option 


OUTLIM 


Optional. Meaningful only for Systems that have the Systems 
Management Facilities Option 


Magnetic 
Tape 


Data Information 


DSNAME 
(or DSN) 


Required if the data set is to be cataloged or used by a later job 


DISP 


Required if the data set is to be cataloged, used by a later step in this job, 
or used by another job 


Location of the Data Set 


UNIT 


Required unless you request (with the VOLUME parameter) the same volume 
used for an earlier data set in your job 


VOLUME 
(or VOL) 


Required if you want a specific volume. If you do not use this parameter you 
get a scratch tape 


LABEL 


Required if you do not want to use IBM standard labels for the data set 


Data Attributes 


DCB 


Optional 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


Direct 
Access 
Devices 


Data Set Information 


DSNAME 
(or DSN) 


Required if the data set is to be cataloged or used by a later job 


DISP 


Required if the data set is to be cataloged, used by a later step in this job, 
or used by another job 


Location of the Data Set 


UNIT 


Required unless you request (with the VOLUME parameter) the same volume 
used for an earlier data set in your job, or unless you use the SPLIT or 
SUBALLOC parameters to allocate space to this data set 


VOLUME 
(or VOL) 


Required if you want a specific volume or multiple volumes. If you do not use 
this parameter your data set will be allocated on any suitable volume 


LABEL 


Required if you want the data set to have both IBM standard and user labels 


Size of the Data Set 


SPACE 


One of these parameters is required. SPLIT can only be used for BSAM or 
QSAM data sets. SPACE must be used for ISAM data sets 


SPLIT 


SUBAUOC 


Data Attributes 


DCB 


Optional. Required for BDAM and ISAM data sets 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


DYNAM 


Optional. Meaningful only for systems with MVT and TSO 
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Creating a new Data Set 



A new data set is an output data set. Before you define it with a DD 
statement you must decide on what type of device you want it placed. 
You can choose from: 

• Unit record devices (card punch or printer) . 

• Magnetic tape. 

• Direct access devices. 

• System output device. 

You will need a different set of parameters depending on the type of 
device you choose (see Table 7) . The following topics describe the use 
of those parameters for each type of device. Please fold out Table 7 
while reading this chapter. 



UNIT RECORD DEVICES 

You can create an output data set on either a card punch or a printer. 
As shown in Table 7, only the UNIT parameter is required to indicate the 
device you want for the data set. The DSNAME and DISP parameters are 
not used because data sets on unit record devices are always temporary 
and cannot be retrieved by another DD statement in your job. 

This section is summarized in Table 64 of Appendix D. 




C 

c 



Creating 



Unit Record 
Devices 



Location of the Data Set 

The location of the data set is given by the UNIT parameter. 

UNIT : The format of the UNIT parameter is : 



j UNIT= 



unit address, 
device type 
group name 



where: 

unit address 

is the actual machine address of the device. For example, 
UNIT=00F. You should not specify the address unless you are sure 
you want that specific device. 

device type 

corresponds to the model number of the I/O device,. Coding a device 
type provides you with a certain degree of device independence in 
that your data set may be placed in any of a number of devices of 
the same type. For example, if you code 

your data set will be punched in any 1442 Card Read Punch in the 
system. The following device types can be specified: 
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Device Type Description 

1052 1052 Printer-keyboard 

1403 1403 Printer or 1404 Printer (continuous form only) 

1442 1442 Card Read Punch 

1443 Any 1443 Printer 
2520 2520 Card Read Punch 

2540-2 2540 Card Read Punch (punch feed) 

3210 3210 Printer-Keyboard 

3211 3211 Printer 

3215 3215 Printer-Keyboard 

group name 

is the name of a collection of devices selected by your 
installation during system generation. For example, your 
installation might select the name PUNCH for all card punch units 
in the configuration. If you do not care which card punch is used 
for your data set, you would then code 

Your manager or supervisor should tell you which group names were 
generated for your installation. 



Data Attributes 

The DCB parameter allows you to specify attributes for your data set 

when your program is to be executed rather than when it is compiled. 

Any applicable attributes not specified in your program must be 

specified with the DCB parameter. However, in most cases, your compiler 

will provide a default value for an attribute if you do not specify it / 

in the program or in the DD statement. Other attributes are always 

given a fixed value by the compiler and you do not have to specify them 

at all. For example, you can select a buffering technique with the 

assembler, but all other IBM compilers select one for you when it is 

needed. 

DCB : You can use the DCB parameter to directly specify the attributes 
of your data set or to copy those attributes specified in a DD statement 
for another data set. 

The format of the DCB parameter for specifying the attribute is: 

r ■ ; 1 

| DCB=(list of attributes) | 

L J 

The attributes in the list are coded in the form of keyword 
subparameters separated by commas; for example, 

DCB= (BLKSIZE=300,LRECL=100) 

The valid subparameters that can be used with each compiler for the card 

punch and printer are shown in Table 8 and 9, respectively. Underscored 

items are those default values selected if you omit the subparameter. 

Default values are not shown where the attribute can either be specified 

in your program, or in the DD statement. If values for a given 

subparameter are not shown, it is either specified in your source 

program or given a fixed value by the compiler. A glossary of DCB g 

subparameters is given in Appendix B. Code only those parameters that ■ 

apply to your compiler as shown in Tables 8 and 9. ^ 
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Table 8. DCB 


Subpa ramet ers 


for Card 


Punch 
































DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


ANS COBOL L— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




ForD ^ 














BFTEK= 




Sor E "— 
(QSAM only) 














BLKSIZE= 


number of bytes 


Ll 

number of bytes 




Ll 

number of bytes 


Ll 

number of bytes 


number of bytes 


number of bytes 


Ll 

number of bytes 


BUFL= 




number of bytes — 














BUFNO= 




Li 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


1 or 2 


1 orl 


Ll 

number of buffers 


EROPT= 




ABE 


ABE 


ABE 


ABE 








HIARCHY= 




Oor 1 *— 














LRECL= 


number of bytes 


number of bytes 








number of bytes 


number of bytes 


Ll 

number of bytes 


MODE= 




C E ^ 
C or E 


Cor E 


Cor E 


Cor E 


Cor E 


Cor E 


CorE. 


NCP= 




Li 

number of channel 
programs (BSAM only) 














OPTCD= 




ll 

[c] U 


[c] 


[c] 


[c] 


fc] 


[c] 


[c] 


RECFM= 


f[b][a] 


u 

V 
F 


A" 
hA 
"B " 
S 

_BS_ 
"B " 
S 
BS 


Ll 

or 








U[A] 

f[b] 


or 

a" 

M 




U 
F 


M 

W 


or 

_mJ 


y 

V 
F 


mJ 
"b ' 
s 

_BS_ 
V 

s 

BS 


or 

fcl 


STACK= 




Ll 

1 or 2 


I or 2 


1 or 2 


I or 2 


I or 2 


J or 2 


lor 2 


This function can be specified in your program rather than in the DD statement. 
For QSAM, you must specify both BFALN and BFTEK on the DD statement, or omit both. 
3 American National Standard COBOL. 
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2 






k 


















O 

S 
& 

a 

«Q 


1 

















00 



Table 9- DCB Subparameters for Printer 



n 

G 
CO 

h 



d 

fD 



50 
(D 
H 

(U 
CO 
(D 

IO 
O 



DCB 
Sobparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


Ll 
ANS COBOL "— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




i- r. H.2 

For D «-J_ 














BFTEK= 




|l,2 

SorE "— 
(QSAM only) 














BLKSIZE= 


number of bytes 


Ll 

number of bytes 




number ot bytes 


, f , Ll 

number ot bytes 


number of bytes 


number of bytes 


u „ Ll 

number of bytes 


BUFL= 




Ll 

number of bytes 














BUFNO= 




Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


1 or2 


1 or2 


Ll 

number of buffers 


EROPT= 




ACC or ABE •— 


ACC or ABE 


ACC or ABE 


ACC or ABE 








HIARCHY= 




Ll 

Oor 1 














LRECL= 


number of bytes 


Ll 

number of bytes 








number of bytes 


number of bytes 


Ll 

number of bytes 


NCP= 




Ll 

number of channel 
programs (BSAM only) 












Ll 

number of channel 
programs 
(BSAM only) 


OPTCD= 




Ll 

H [u] 


[c] 


[cj 


[c] 


[c] 


[c] 


[c] [u] t 


PRTSP= 




0,1,2, or 3 "— 


LL 

0,1,2, or 3 "— 


Ll 

0,i,2,or3 "— 


0,1,2, or 3 l — 


Ll 

0,1,2, or 3 ' — 


Li. 

0,1,2, or 3 ' — 


Li 

0,1,2, or 3 ' — 


RECFM= 


F 


"b" 

_BS_ 


W 


U 
V 
F 


A" 
_M_ 

"b" 

S 
_BS_ 

"b" 

S 
BS 


Ll 

or 

[m]" 








Formatted : 
U[A] or 

F[B] fc] 

Unformatted: 

vsW K 


Formatted : 
U[A] or 

Lm_ 

Unformatted: 

vsM M 


U 
V 
F 


A" 
_M_ 

"b~ 

S 
_BS_ 

V 

S 

BS 


Ll 

or 

KI 


This function can be specified in your program rather than in the DD statement. 
2 For QSAM, you must specify both BFALN and BFTEK on the DD statement, or omit both. 
' Do not use if A or M is specified in the RECFM. 
4 American National Standard COBOL. 



The format of the DCB parameter for copying the DCB parameter of a 
previous DD statement in your job is : 



1*.ddname 
* . stepname. ddname 
* . stepname. procstepname. ddname 



[,list of attributes]) 



Replace "ddname " with the name of the DD statement whose DCB parameter 
you want to copy. Replace "stepname" with the name of the EXEC 
statement of the step that contains that DD statement. If the DD 
statement you want to copy is contained in the same job step, omit the 
stepname, i.e., DCB=*. ddname. The following example shows hew to code 
the DCB parameter to copy the DCB parameter of a DD statement in a 



//STEP 2 EXEC... 

//DD1 DD...,DCB=(BLKSIZE<L600,LRECL=80) 




//STEP 4 EXEC... 

//COPY DD...,DCB=*.STEP2.DD1 



C 

c 



Creating 



Unit Record 
Devices 



The following example shows how to code the DCB parameter to copy the 
DCB parameter of a previous DD statement in the same step: 



//STEPD EXEC... 

//DDA DD...,DCB=RECFM=F 



//DDC DD.. .,DCB=*.DDA 



If you want to copy the DCB parameter of a DD statement contained in a 
cataloged procedure step, you must give both the name of the job step 
that invokes the procedure and the procedure step name,, i.e.. 



DCB=* . stepname. procstepname. ddname 



The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the CALL EXEC 
statement in your deck. 
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INPUT DECK 



//CALL EXEC PR0O=XYZ 



stepname 
//COPY EXEC... 

//DD1 DD ,DCB=*. CALL. STEP4. PRINT 

ddname 
proc stepname 



, 



//STEPU EXEC... 

//PRINT DD . . . , DCB=PRTSP=3 



,i ; — • • , , j 



If you want to modify the DCB subparameters you are copying add the new 
subpararoeters to the reference. The subparameters you specify will 
override the corresponding copied subparameters. For example. 



//PUNCH1 DD...,DCB=(BLKSIZE=160,LRECL=80,OPTCD=C,MODE=F,RECFM=F) 
//PUNCH2 DD...,DCB=(*.PUNCH1,M0DE=C,STACK=2) 



Special Processing Options 

There are three special processing options: 

1. If your data set is going to be printed on a printer with the 
universal character set feature , you can use the UCS parameter to 
specify a particular character set image. If you omit the UCS 
parameter, the default character set image is used if it is 
currently in the UCS buffer. Otherwise, the operator will be 
requested to specify an image and, if necessary, mount the 
appropriate print chain or cartridge. 

2. If your data set is going to be printed on a 3211 printer, use the 
FCB parameter to specify a particular FCB image for forms control. 
If you omit the FCB parameter, the default image is used if it is 
currently in the FCB buffer. Otherwise, the operator will be 
requested to specify an image. 

3. You can suppress I/O operations on your data set using the DUMMY 
parameter. 



i 
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UCS ; The format of the UCS parameter is: 



| UCS= ( code [", FOLD] [ , VERIFY] ) 

! I- J 



code 



is the character set code which corresponds to the IBM standard 
character set image you want to use. For example, if you want the 
"preferred character set, arrangement A", code UCS=PCAN. One of 
the following codes can be specified. 



I T T 

| Codes for 1403| Codes for 3211 | 
j + + . 



Characteristics 




AN 
HN 

PCAN 

PCHN 

PN 
QNC 

ON 

RN 

SN 

TN 

XN 

YN 



All | Arrangement A, standard ECBDIC character 
set. 48 characters. 

Hll I Arrangement H, EBCDIC character set for 
FORTRAN and COBOL, 48 characters. 

Gil | ASCII character set. 

Preferred alphameric character set, 
arrangement A. 

Preferred alphameric character set, 
arrangement H. 

Pll JPL/1 alphameric character set. 

PL/1 preferred alphameric character set 
for commercial applications. 

PL/1 preferred alphameric character set 
for scientific applications. 

Preferred character set for commercial 
applications of FORTRAN and COBOL. 

Preferred character set for text 
printing. 

Til I Character set for text printing, 120 
characters. 

High-speed alphameric character set for 
1403, Model 2. 

High-speed preferred alphameric 
character set for 1403, Model 3 or Nl. 



C 
C 
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Not all of the above character set images might be present in your 
operating system. We suggest you place a check mark next to those 
available to you. In addition to IBM character set images, your 
installation may have its own character set images that have been 
assigned unique character set codes. You should add those codes 
and a description of the corresponding character set images to the 
above list. Your manager or supervisor should give you a complete 
list of available codes. He will also tell you which character set 
images were selected as defaults during system generation. 
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FOLD 



specifies that you want bits and 1 to be ignored when comparing 
characters between the UCS buffer and the print line buffer- The 
fold mode is most often requested when uppercase and lowercase data 
is to be printed only in uppercase- The FOLD option can be coded 
only when a character set code is specified as the first 
subparameter of the UCS parameter. For example 



You cannot specify FOLD if you did not specify the code 
subparameter. For details on the FOLD mode, refer to the 
publication IBM 2251 Control Unit . GA24-3312. 

VERIFY 

specifies that you want a printer display of the character set 
images- This specification requests that the operator is to 
visually verify that the character set image corresponds ^ to the 
graphics of the chain or train that was mounted- For example. 

The VERIFY option can only be coded when a character set code is 
specified with UCS parameter- That is, you cannot specify VERIFY 
if you did not specify the code subparameter and are getting a 
default character set. 

Notes: 

• You can specify both the FOLD and VERIFY options for the same 

• If you code VERIFY but omit FOLD, you must code a comma to indicate 

• If you do not want the FOLD or VERIFY options, you can omit the 
parentheses- For example. 



FCB : The format of the FCB parameter is: 

| I", ALIGN 1 

| FCB= ( imag e-i d [, VERIF YJ ) 



image- id 

is the code (1 to 4 characters in length) that identifies the image 
to be loaded into the forms control buffer- This image is used to 
control the movement of the forms in the printer. It can be 
retrieved from SYS1.IMAGELIB or defined in the user's program 
through the exit list facility of the DCB macro instruction. IBM 
provides two standard FCB images, STD1 and STD2. STD1 specifies 
that 6 lines per inch are to be printed on an 8.5 inch form. STD2 
specifies that 6 lines per inch are to be printed on an 11 inch . 
form- The installation can provide additional user-designed m 

iimap.q. ^ 



images 
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If you omit the FCB parameter and the data set is written to a 3211 
printer, the default image is used if it is currently in the 
buffer- Otherwise, the operator will be requested to specify an 
image. 

ALIGN 

requests the operator to check the alignment of printer forms 
before the data set is printed. The ALIGN option can be coded only 
when an image-id is specified with the FCB parameter. For example: 

FCB=(STD1, ALIGN) 

VERIFY 

requests the operator to visually verify the image displayed on the 
printer as the desired one. The operator is also given an 
opportunity to align the printer forms. The VERIFY option can be 
coded only when an image-id is specified in the FCB parameter. 
For example: 




Notes : 



FCB=(STD2, VERIFY) / 

I Creating 



You cannot specify both ALIGN and VERIFY in the same FCB parameter. ( Unit Record 

V Devices 

If you do not code the ALIGN or VERIFY options, you can omit the 
parentheses. For example: 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set allocation and disposition. When your processing program asks to 
write the dummy data set, the writer request is recognized, but no data 
is transmitted. This facility is particularly useful when you are 
debugging your program because it saves you processing time. For 
example, you can suppress the writing of a data set until you are sure 
your program is going to produce meaningful output. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

//OUTPUT DD DUMMY, UNIT=2520,DCB=BLKSIZE=50 



If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 
above could be coded as follows: 

//OUTPUT DD DUMMY, DCB=BLKSIZE= 50 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to write the 
data set. For example, 

//OUTPUT DD UNIT=2520,DCB=BLKSIZE=50 
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SYSTEM OUTPUT DEVICES 

Your installation can designate printers and card punch units as system 
output devices . These system output devices can be grouped into output 
classes . (These are the same output classes described for the MSGCLASS 
parameter of the JOB statement.) For example, one printer can be 
designated as a class for compilation listings; another printer with a 
special print chain can be a class for those output data sets that need 
the special chain. There can be up to 36 output classes, although most 
installations need fewer. The output classes are designated by a letter 
(A-Z) or a number (0-9). Your manager or supervisor should give you a 
list of the output classes in your installation and of the devices in 
each class . 

Whenever you have an output data set to be printed or punched, you 
can either request a unit as described in "Unit Record Devices, 1 ' or you 
can request the output class that has the type of device you need. 
(Please note that not every printer or card punch unit is necessarily 
assigned to an output class.) You indicate which output class you want 
with the SYSOUT parameter. For example, SYSOUT=M means that you Want 
your data set produced on one of the devices of output class M. 

| Output Class Processing : The system allocates a data set for you on a 
direct access volume and writes your output on this data set. Later, a 
system routine called the system output writer (or a special 
installation-written program) transfers your data set to a unit of the 
output class you selected. This allows greater flexibility in 
scheduling print and punch operations and improves operating system 
efficiency. (You do not have to allocate space for your data set on a 
direct access device. The system takes care of that automatically with 
a standard allocation. However, if you have an unusually large data 
set, you can override the standard allocation using the UNIT and SPACE 
parameters as described later on in this topic.) 

| The system can also write an output data set directly to the desired 
unit record or magnetic tape device. When using the direct system 
output processing, the operator selects a unit record or magnetic tape 
device for a class by issuing a START DSO (direct system output) 
command. In addition to the SYSOUT parameter, the DCB and UCS 
parameters can be coded. If the SYSOUT subparameters other than 
classname are coded, the specified information is ignored. The UNIT and 
SPACE parameters are also ignored if the direct system output writer is 
used. Since the type of processing to be used may not always be known, 
it is advisable to code these parameters in case an intermediate direct 
access device is used. 

This section is summarized in Table 65 of Appendix D. 



Location of the Data Set 

You indicate the selected output class with the SYSOUT parameter. 
Your data set can be first written on a direct access device and 
then transferred to the output class selected. The system assigns 
you a direct access device unless you request a specific one with 
the UNIT parameter. 



SYSOUT : You use the SYSOUT parameter to specify the output class. You 
can also specify that a special installation-written program be used to 
transfer your data set to the unit record device, and that the data set 
be printed or punched on a special output form. 
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I The format of the SYSOUT parameter is: 



j SYSOUT= (c lassnamel", program"] [ , form number] ) 

! L- J 



Replace the term "class name" with the letter (A-Z) or number (0-9) that 
indicates the output class desired- When using direct system output 
processing., all SYSOUT subparameters other than classname are ignored if 
coded. 

If you want the output data set and the system messages resulting 
from your job to be printed in chronological order on the same output 
listing, specify the same output class you requested with the MSGCLASS 
parameter of the JOB statement. If you omitted the MSGCLASS parameter, 
code SYSOUT=A unless the default for the MSGCLASS parameter is not A for 
your installation. 

Replace the term "program" with the name of the special installation 
program that is to handle the transfer of your data set from direct 
access to the output class requested. If you do not specify a special 
program, the standard system output writers will handle the transfer. 
Your manager or supervisor will tell you whether you should request a 
special program rather than the standard system output writer. 

Replace the term "form number" with the 4-digit form number of a 
special printer paper or punched card stock you want to use for your 
data set. If you do not specify a form number your installation 
provides some standard type of paper or card. Your manager or 
supervisor will tell you whether you should use a special form number 
for the output data set. 

| In the following example you request output class 8 for your data set. 

Using the same example, if you want to use special form 2107 for writing 

//DD8 DD SYSOUT=(8,,2107) 

In the following example* you request output class R for your data set. 
You also want a program named WTRPRT to transfer the data set from the 
direct access device to a device of output class R. 

//PRINT DD SYSOUT- (R, WTRPRT) 

Using the same example, if you also want your data set written on 

//PRINT DD SYSOUT- (R, WTRPRT, 7329) 
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| UNIT : The UNIT parameter can be used to indicate the type of direct 
access device on which your data set will be recorded before being 
transferred to the output class by the system output writer. In the 
UNIT parameter, you can request the type of direct access device you 
want, how many devices you want (up to a maximum of five),, and unit 
separation from other data sets. (Do not request more than one unit 
unless you also use the SPACE parameter to make a secondary allocation.) 
The UNIT parameter should be coded as described in "Direct Access 
Devices . " 
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If you omit the UNIT parameter the system assigns an available unit. 



In the following example you request that a 2314 drive be used to 
store your data set before it is transferred to output class B. 

Using the same example, if you want a special program named WTRPCH to 
effect the transfer from the 2314 unit to output class B, code: 



Size of the Data Set 

Your data set can be written on a direct access device before it is 
transferred to the selected output class. The system allocates a 
standard amount of space on the device. Your manager or supervisor 
should tell you the size of the standard allocation. If your data set 
is unusually large you can override the standard allocation with the 
SPACE parameter. 



SPACE : The SPACE parameter is described in "Direct Access Devices." 
You can request space in units of tracks, cylinders, or blocks. If you 
request it in units of tracks or cylinders you should also specify the 
UNIT parameter for more efficient allocation. 

If you make a secondary allocation, you can specify more than one 
device in the UNIT parameter. You can also specify the RLSE 
subparameter to release any unused space. 



In the following example, a data set is to be written on a device of 
output class P. Instead of letting the system use the stand default 
values you want to assign 20 cylinders on a 2314. In case 20 cylinders 
are not enough, you want to make a secondary allocation of 5 cylinders. 

//OUT DD SYS0UT=P, UNIT= 231 4, SPACED (CYL, (20,5)) 

Using the preceding example, if you think two 2314 units may be 
needed, and if you also want to release unused space code: 

//OUT DD SYSOUT=P,UNIT=(2314,2),SPACE-(CYL, (20,5), RLSE) 



Data Attributes 

The DCB parameter allows you to specify data set attributes for your 
data set. For direct system output processing, you should specify the 
data attributes of a printer or card punch. When the data set is 
written first to a direct access device before it is transferred to the 
system output device, you should specify the data attributes of your 
SYSOUT data set on a direct access device. 



DCB : The DCB parameter for printer and card punch is described in "Unit j 
Record Devices" (Table 8 and 9); for direct access devices, the DCB ■ 

parameter is described in "Direct Access Devices" (Table 13). 
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In the following example, you specify printer spacing (PRTSP) for a 
data set that is to be printed in output class A. 

Special Processing Option 

The OUTLIM parameter allows you to specify a limit for the number of 
logical records you want included in the output data set being routed 
through the output stream. The OUTLIM parameter has meaning only in 
systems that have the System Management Facilities option with system, 
job, and step data collection. Your manager or supervisor should tell 
you whether your system has the System Management Facilities option. 



OUTLIM : The format of the OUTLIM parameter is: 



| OUTLIM=number 

Replace the term "number" with a numeric value of 1 through 16777215. 
The OUTLIM parameter is ignored unless SYSOUT is coded in the operand 
field of the same DD statement. 

The limit for the number of logical records you want as output must 
include a system overhead factor. Generally, the value you add to the 
limit is eight times the blocking factor for your data. (For those 
programmers who need a more precise value: The system overhead is the 
number of EXCPs issued each time the OPEN or CLOSE macro instruction is 
issued for the data set.) 

When the number specified is reached, an exit provided by the System 
Management Facilities option is taken to a user supplied routine that 
determines whether to cancel the job or increase the limit. If the exit 
routine is not supplied, the job is cancelled. 

A discussion of the System Management Facilities option is contained 
in the publication IBM System/360 Operating System: Concepts and 
Facilities . Information on user exit routines to be used with the 
System Management Facilities option is contained in the publication IBM 
System/360 Operating System: System Programmer's Guide . 




C 



Creating 



Magnetic 
Tape 



MAGNETIC TAPE 

You can create an output data set on magnetic tape using the parameters 
shown in Table 7. The data set information parameters (DSNAME and DISP) 
let you specify whether your data set is to be temporary or 
nontemporary. The location parameters (UNIT, VOLUME, and LABEL) let you 
specify whether your data set is to occupy one volume (one reel of 
tape), several volumes, or part of a volume and the type of labels you 
use for those volumes. You can also use special processing options (SEP 
and AFF) to optimize channel use. 

This section is summarized in Table 66 of Appendix D. 

Magnetic Tape and ASCII 

When input data sets on magnetic tape are in American National Standard 
Code for Information Interchange (ASCII), they are translated from ASCII 
to EBCDIC for processing and from EBCDIC to ASCII for output. The 
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following section on magnetic tape contains information on the 
parameters you specify for ASCII tapes. Refer to the publications IBM 
System/ 360 Operating System: Data Management Services and IBM 
System/ 360 Operating System: Tape Labels for additional information on 
ASCII processing and American National Standard labels. For an 
explanation of the DCB subparameters you specify for ASCII data sets on 
tape, refer to Appendix B of this publication. 



Data Set Information 

The DSNAME and DISP parameter are used to specify which type of data set 
you want to create. There are two types of data set: temporary and 
nontemporary. A temporary data set is one that will be used for the 
duration of the jobstep or the job only. A nontemporary data set is one 
that can be used not only by the jobsteps in your job, but by later jobs 
as well. There are three types of nontemporary data sets: cataloged 
data sets, kept (or noncataloged) data sets, and members of generation 
data groups. 

The following is a summary of the types of data sets that can be 
created on magnetic tape: 

1. Temporary 

a. For the duration of the job. 

b. For the duration of the jobstep. 

2 . Nontemporary 

a. Cataloged. 

b. Kept (or noncataloged). 

c. Member of a generation data group. 

The formats of the DSNAME and DISP parameters for each type of data set 
are described below. 

Temporary — For the Duration of the Job : The formats of the DSNAME and 
DISP parameters are: 

| DSNAME= j 6 Sname } , DISP= (NEW , PASS . DELETE ) | 

| | Sname \ | 

l -L I _i 

In the DSNAME parameter, replace the term "name" with any name not 
used by another temporary data set in the job. Each name consists of 
one to eight alphameric or national (a,$,#) characters. However, the 
first character of the name must be a letter or national character. The 
system generates a name for the temporary data set, which begins with 
SYS and includes the jobname, the temporary name assigned in the DSNAME 
parameter, and other identifying characters. You can retrieve this data 
set later in the job by coding 



or 



DSNAME=S Sname 

DSNAME= Sname 

in a DD statement, using the same name, or by coding: 

DSNAME=* . stepname . ddname . 

A double ampersand should be coded preceding the temporary name you j 

assign to a data set. However, a name preceded by a single ampersand is m 

treated as a temporary data set name, as long as no value is assigned to ^ 
it either on an EXEC statement invoking a procedure, or a PROC statement 
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within a procedure. If a value is assigned to it by one of these means, 
it is treated as a symbolic parameter. (Symbolic parameters are 
discussed in the section "The PROC Statement" and in "Part IV: 
Cataloged Procedures.") 

In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. You do not have to code NEW as long as you 
indicate its absence with a comma. The PASS subparameter indicates that 
the temporary data set can be used by later steps in the job. The 
DELETE subparameter indicates that this data set is to be deleted if the 
job step abnormally terminates (ABEND). You need not code DELETE 
because it is always assumed by the system for temporary data sets. 

For example, the parameters DSNAME and DISP in the following DD 
statement indicate that the temporary data set named AREA can be used by 




Temporary — For the Duration of the Job Step ; Both the DSNAME and DISP ( Creating 

parameters can be omitted to indicate a temporary data set which will be ^ 

deleted at the end of the job step. You can, if you wish, code the 



following: " ( Magnetic 

V^ Tape 



j DSNAME=U£narae) „ DISP= (NEW, DELETE. DELETE ) 
| j Sname } 



The temporary name in the DSNAME parameter is coded as described for 
temporary data sets for the duration of the job. All subparameters of 
the DISP parameter are assumed if omitted. For example, the three 

//DD2 DD DSNAME=€&AREA # ... 
Note that the location parameters must still be coded in those 



Nontemporary — Cataloged : The formats of the DSNAME and DISP parameter 
are: 

| DSNAME=dsname , DISP= ( NEW .CATLG f, CATLG "I ) | 

| , DELETE j 

| Lkeep J I 

L J 

In the DSNAME parameter, replace the term "dsname" with the qualified 
name you want to give to the data set. A qualified name is made up of 
several 1- to- 8- character names separated by periods. All but the last 
of those names correspond to index levels in the catalog. Each name 
must begin with a letter or national (a, $,#) character. Any letter, 
number, national character, the hyphen, and the +0 (12-0 multi punch) can 
be used to complete each name. A qualified name can consist of 1 
through 44 characters (including periods). For example, 

DSNAME* AB-5 9 3 . M, $7 . R2 57 9AB2 
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Each level of qualification must already exist as an index in the 
system catalog before you can request the system to catalog the data 
set. An index level is created using the IEHPROGM utility program. 
Once the indexes are established, the data set can be cataloged. If the 
name has no qualifiers (called unqualified name), the system will create 
the index entry for you. For example. 



In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. You do not have to code NEW as long as you 
indicate its absence by a comma. The CATLG subparameter indicates that 
the data set is to be cataloged. The third subparameter tells the 
system what is to be done with the data set if the step abnormally 
terminates (ABEND) . If the data set name is either qualified or 
unqualified, you can specify CATLG or DELETE. CATLG is assumed if you 
omit the third subparameter. If the data set is unqualified, you can 
specify KEEP as the third subparameter. KEEP tells the system that if 
the step abnormally terminates you want the data set kept intact (but 
not cataloged) until a later job requests that the data set be deleted 
or until the expiration date has passed. (You can specify a retention 
period or expiration date in the LABEL parameter.) 

In the following example, a new data set named SYSTEM. FILE1 is to be 
cataloged. If the step abnormally terminates it will be cataloged. 

//DD3 DD DSNAME= SYSTEM. FILE1, DISP=(, CATLG ), ... 

In the following example, a new data set named AREA#5 is to be 
cataloged. If the step abnormally terminates, it will be kept. 



Nontemporary — Kept ; The formats of the DSNAME and DISP parameters 
are: 



| DSNAME=dsname, DISP= (NEW,KEEP 



',KEEP "]) 
, DELETE 
, CATLG J 



In the DSNAME parameter, replace the term "dsname" with the 
unqualified name you want to give to the data set. The name can contain 
from 1 to 8 characters. The first character must be a letter or a 
national character (a, $,#). Any letter, number, national character, the 
hyphen, and the +0(12-0 multipunch) can be used to complete the name. 



DSNAME=8A#753 



In the DISP parameter,, the NEW subparameter indicates that you are 
creating the data set. You do not have to code NEW as long as you 
indicate its absence by a comma. The KEEP subparameter indicates that 
the data set is to be kept intact (but not cataloged) until a later job 
step or job requests that the data set be deleted or until the 
expiration date has passed. (You can specify a retention period or 
expiration data in the LABEL parameter.) The third subparameter tells 
the system what is to be done with the data set if the step abnormally 
terminates (ABEND) . You can specify KEEP, DELETE, or CATLG . KEEP is 
assumed if you omit the third subparameter. 
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In the following example, a new data set named RTW is to be kept, 
the step abnormally terminates, it will also be kept. 

//DD5 DD DSNAME=RTW, DISP= ( ,KEEP) , . . . 

In the following example, a new data set named TWO is to be kept; 
the step abnormally terminates it will be deleted. 



Notes : 



If 



If 



• You can give a disposition of PASS to a new data set with an 
unqualified name. For example, 

DSNAME=DATA, DISP= ( ,PASS) 

Such a data set can become a temporary, cataloged, or kept data set 
according to the disposition you give to it in a later DD statement. 
See "Passed Data Sets" in "Retrieving an Existing Data Set." If the 
data set is not referred to by a later DD statement in the job, it 
is deleted at the end of the job. 

• You can use special characters as part of the unqualified data set 
name if you enclose the name in apostrophes. For example, 

DSNAME^AB^SO 1 

If the special character is an apostrophe, you must code it as two 
consecutive apostrophes. For example, code NAT'L as 

Do not catalog the data set if you enclose the data set name in 
apostrophes . 
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Nontemporary — Member Generation Data Group : A cataloged data set that 
is periodically processed can be grouped with its earlier generations to 
form a named generation data group. The entire group has a generation 
group name. Each member of the group can be addressed by a simple 
generation number. The last generation produced before the start of 
your job has a generation number of 0. The generation produced before 
the last one is -1. The generation you are going to produce in your job 
is +1. After your job ends, the generation you produced automatically 
becomes generation 0. If you produce more than one generation in your 
job, you must name them +1, +2, +3, etc. After your job, the highest 
generation number you produced, say, +3, becomes generation 0; +2 
becomes -1; and +1 becomes -2. 

For further information on creating generation data groups, refer to 
Appendix D of the publication IBM System/360 Job Control Language 
Reference . The formats of the DSNAME and DISP parameters for creating a 
new member of a generation data group are: 



| DSNAME=groupname ( + number ) , DISP= ( NEW , CATLG 



fc 



CATLG ]) 

delete! 
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In the DSNAME parameter, replace the term "groupname" with the name 
of the generation data group. The name can contain from one to eight 
characters. The first character must be a letter or national character 
(a,$,#). Any letter, number, national character, the hyphen, and the 
+0(12-0 multipunch) can be used to complete the name. The groupname can 
be a qualified name. The qualified name can contain up to 35 characters 
(including periods). Replace the term "number" with the number of the 
generation you are creating. If you are only creating one generation in 
your job, this number will be 1. For example. 



or 



DSNAME=PAYROLL. PLANT20 (+1 ) 



DSNAME* MASTER (+1) 



If you are creating more than one generation in your job, number each 
generation consecutively. For example. 

In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. You do not have to code NEW as long as you 
indicate its absence by a comma. The CATLG subparameter indicates that 
the new generation is to be cataloged. (This subparameter is required.) 
The third subparameter tells the system what is to be done with the data 
set if the step abnormally terminates (ABEND). You can specify CATLG or 
DELETE. CATLG is assumed if you omit the third subparameter. 

In the following example, two new generations are added to the 
PAYROLL generation data group. If the step abnormally terminates the 
new generations will be deleted. 



//STEP EXEC PGM*... 



' • t 



//DD7 DD DSNAME-PAYROLL(-H),DISP= s (, CATLG, DELETE),... 
//DD8 DD DSNAME=PAYROLL(+2),DISP*(,CATLG # DELETE),... 



t. J 



I ; ; „._. I 



After your job is successfully completed PAYROLL(*2) becomes PAYROLL (0) , 
and PAYROLL(*l) becomes PAYROLL (-1). 



Location of the Data Set 



The UNIT, VOLUME and LABEL parameters are used to describe the location 
of your data set. The UNIT parameter indicates which kind of tape drive 
you want,, and, if your data set is to. occupy more than one volume, it 
indicates how many tape drives are needed. The VOLUME parameter lets 
you request a scratch volume (or volumes) or a private volume (or 
volumes). If you request a private volume you can request a specific 
volume or you can let the system assign you a volume. The LABEL 
parameter describes the tape label of the volume used for your data set. 



< 
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UNIT ; The format of the UNIT parameter is : 



I 

| UNIT=( 



unit address 
device type 
group name 



, unit count"! 



[, DEFER]) 



The first positional subparameter identifies the tape drive you want 
to use for your data set by its address, or unit name, or group name. 



unit address 

is the actual machine address of the tape drive. 

UNIT=240 



For example. 



You should not specify the address unless you are sure you want it. 
Do not specify an address if you are going to need more than one 
drive for the data set. (Multiple drives are requested with the 
second subparameter of the UNIT parmeter.) 

device type 

corresponds to the type of tape drive. Coding a device type 
provide you with a certain degree of device independence in that 
your data set may be placed in any number of devices of the same 
type. For example, if you code 

your data set will be placed on any 2400 series tape drive with 
seven-track compatibility and without data conversion. The 
following device types can be specified. 

Device Type Description 




C 
C 



Creating 



Magnetic 
Tape 



2400 



2400-1 
2400-2 
2400-3 

2400-4 



2400 series Nine-Track Magnetic Tape Drive that can be 
allocated to a data set written or to be written in 
800 bpi density when the dual density feature is not 
installed on the drive, or in 1600 bpi when the 
dual-density feature is installed in the drive. 

2400 series Magnetic Tape Drive with Seven-Track 
Compatibility and without Data Conversion. 

24 00 series Magnetic Tape Drive with Seven-Track 
Compatibility and Data Conversion. 

2400 series Nine-Track Magnetic Tape Drive that can be 
allocated to a data set written or to be written in 
1600 bpi density. 

24 00 series Nine-Track Magnetic Tape Drive having an 
800 and 1600 bpi capability. 



group name 

is the name of a collection of devices, selected by your 
installation during system generation. For example, your 
installation might select the name TAPE for all tape drives in the 
configuration. If you do not care which tape drive is used for 
your data set, you would then code 

Your manager or supervisor should tell you which group names were 
generated for your installation. 
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The second positional subparameter is used only if your data set will 
occupy more than one volume and if you want more than one of those 
volumes to be mounted at the same time. This subparameter indicates how 
many drives are to be used for mounting your data set's volumes. 

unit count 

indicates how many tape drives you want assigned to the data set. 
You can specify a maximum of 59 drives per DD statement. Make sure 
that your system has at least the number of drives you specify. 
Otherwise an error will result. If you specify fewer drives than 
the number of volumes in your data set, only the same number of 
volumes as there are drives can be mounted at the same time. (If 
you think your data set may use more volumes than you expect, you 
should indicate the maximum number of volumes that can be used with 
the volume count subparameter of the VOLUME parameter. Do not 
request any more tape drives than the maximum number of volumes you 

five 800 bpi drives will be assigned to your data set. 



specifies parallel mounting. When you request parallel mounting 
the system counts the number of serial numbers specified with the 
VOLUME parameter and assigns to the data set as many tape drives as 
there are serial numbers. You should only use the P subparameter 
if you are making specific volume requests in the VOLUME parameter. 
If , in addition to indicating specific serial numbers in the VOLUME 
parameter, you also indicate a maximum number of volumes that can 
be used by the data set, the number of drives assigned is the 
number of serial volumes you specified and not the larger maximum 
number of volumes that can be used. a 

If your data set required only one tape drive, you can either code 
or omit this parameter. If you omit this subparameter and the DEFER 
subparameter follows, you should code a comma to indicate its absence. 



DEFER is the third positional subparameter. DEFER requests the 
system to assign the required tape drives to the data set and to defer 
the mounting of the volume or volumes until the processing program 
attempts to open the data set. Operating efficiency may decrease if you 
specify DEFER for a tape data set. If DEFER is coded for a tape data 
set, the system issues a mount message to the operator when the 
processing program attempts to use the data set and then waits until the 
volume is mounted. If you do not code DEFER, the mount message is 
issued when the device is assigned and there is no waiting for the 
operator. By the time your program tries to use the data set, it is 
very likely that the operator has already mounted the volume and that 
the system will not have to wait for him. 

In the following example, the UNIT parameter is used to request four 
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In the following DD statement, the unit parameter is used to request 
as many tape drives of a group named TAPE as there are volumes 
specifically requested with the volume parameter. Deferred mounting is 
also requested. 

//DD9 DD UNIT=(TAPE,P, DEFER), VOLUME=SER=(ABC24,ABC25, ABC29) , . . . 

As a result three tape drives are assigned to the data set, and all 
three volumes requested can be mounted at the same time. 

Note ; The UNIT parameter is ignored if you use the VOLUME parameter to 
request a volume used by a data set defined earlier in your job, that 
is, if you specify VOLUME=REF. 



VOLUME : The VOLUME parameter lets you request a specific volume for 

your data set or lets the system assign your data set a suitable volume /" \ 

(nonspecific request). If you make a nonspecific request, you can ask I Creating 

for a scratch volume or for a private volume. If you make a specific 

request, you get a private volume. Scratch volumes can only be ^ — 

requested for temporary data sets. Private volumes can be requested for { Magnetic 

either temporary or nontemporary data sets. The following is a summary V "ape 
of the types of volume request that can be made for new data sets on 
magnetic tape: 

1. Nonspecific request 

a. Scratch volume 

b. Private volume 

2. Specific request 
a. Private volume 

Note : When you ask the system to assign you an available volume 
(nonspecific request),, you can also specify which kind of labels you 
want that volume to have. You simply indicate the label type with the 
LABEL parameter and the system will make a volume with that label type 
available to you. 



Nonspecific Request — Scratch Volume : If you have a temporary data set 
you can request a scratch volume. The format of the VOLUME parameter 
depends on whether you need one volume or more than one volume. 

1. To request only one scratch volume simply omit the VOLUME 

parameter. For example, if you have a temporary data set that will 
last only for the duration of the job step and you want a scratch 
volume to be mounted on a nine-track (800-bpi) tape drive, code: 

//DD10 DD UNIT=2400,... 

If you have a temporary data set named ££AREA that is to be passed 
to other steps in your job and you want a scratch volume to be 
mounted on a seven-track drive with data conversion, code: 

//DD11 DD DSNAME=£SAREA,DISP=(,PASS) # UNIT=2400-2,... 
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If your temporary data set requires more than one scratch volume, 
code the VOLUME parameter as follows: 

i ■ 1 

| VOLUME= ( , , , volcount ) | 

L . J 



Replace the term "volcount" with the number of volumes required for 
your data set. For example, if your data set requires four scratch 
volumes and you want them in succession on one nine-track tape 

If your temporary data set requires six scratch volumes, and you 
want to have them mounted two at a time on two nine- track drives, 

//DD13 DD UNIT=(2400,2),VOLUME=(,,,6), ... 



Note : If, when you make a nonspecific volume request for a tape with 
IBM standard labels, the system allocates a device containing a ready 
tape, the system will assume it is a scratch tape and use it. This tape 
could be available for the following reasons: 

• The operator had premounted the tape. 

• The tape was left mounted as a scratch tape by another job because 
the disposition specified for the data set on that tape was DELETE. 

• The tape had been requested by another job, but the job terminated 
before the tape became ready. As a result, no message to demount 
the tape was sent to the operator. This situation can be avoided by 
coding DEFER in the UNIT parameter to defer mounting of the volume 
until the processing program attempts to open the data set. 



Nonspecific Request — Private Volume : If you make a nonspecific 
request for a private volume, the system assigns an available volume to 
you. The private volume is demounted after its use in the job step, 
unless a MOUNT command was used to mount it or the data set is passed to 
a later job step. 

The format of the VOLUME parameter depends on whether your data set 
is temporary or non temporary. 

1. The format of the VOLUME parameter for making a nonspecific volume 
request for temporary data sets is: 

r 1 

| VOLUME= (PRIVATE [ , , , volcount] ) | 

L J 

The PRIVATE subparameter is required. If your temporary data set g 

requires more than one volume,, replace the term "volcount" with the ■ 
number of volumes required. ™ 

118 JCL User's Guide (Release 20.1) 



2. 



If the SSFILE data set only needs one volume, code: 

// VOLUME=PRIVATE , . . . 

If the S&FILE data set needs five volumes to be mounted at the same 
time on five drives, code: 

In the preceding examples the volume is not demounted at the end of 
the step because you coded PASS in the DISP parameter. When the 
volumes are mounted in sequential order, only the last volume used 
remains mounted at the end of the step. 

If your temporary data set is used only in one job step the volume 
is demounted at the end of the step. For example, 

or, if your temporary data set needs three volumes, code 

V/DD18 DD UNIT=TAPE, VOLUME= (PRIVATE, , ,3) 

The format of the VOLUME parameter for making a nonspecific volume 
request for a nont empor ary data set is : 




C 

c 
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VOLUME= ( [PRIVATE, RETAIN C, , volcount] ) 



The subparameter PRIVATE is not needed when you have a nontemporary 
data set because the system always assigns a private volume to 
nontemporary tape data sets. You only need to code PRIVATE when 
you also code RETAIN. 

RETAIN means that the volume will not be demounted at the end of 
the step. (RETAIN has the same effect on volume mounting as coding 
PASS in the DISP parameter.) For example, if you want a 
nonspecific private volume for a data set named ALPHA, code: 

//DD19 DD DSNAME=ALPHA,DISP=(,KEEP),UNIT=2400 

If you want to make sure that the nonspecific volume used for ALPHA 
remains mounted at the end of the step, code: 
V/DD20 DD DSNAME=ALPHA,DISP=(,KEEP) ,UNIT=2400, 

If your nontemporary data set needs more than one volume, replace 
the term " volcount" with the number of volumes needed. For 
example, if the data set ALPHA. BETA needs four volumes to be 

//DD21 DD DSNAME=ALPHA.BETA,DISP=(,CATLG),UNIT=(TAPE,2), 
// VOLUME= ( PRIVATE, RETAIN , , U) 
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Notes : 



When you request a non-specific tape volume for a data set with no 
labels, the system assigns the volume serial numbers required for 
the data set. If a volume count greater than 99 is specified, 
duplicate volume serial numbers are assigned. 

The RETAIN subparameter is not needed if the tape volume was mounted 
with the MOUNT command. A volume thus mounted remains mounted until 
an UNLOAD command is issued. It is recommended that you use the 
RETAIN subparameter whenever you want the volume to remain mounted 
at the end of the step. 

If you specify KEEP for your nontemporary data set, ask the machine 
operator to tell you the serial number of the volume assigned to 
your data set. You need the serial number to retrieve your data set 
in later jobs. 



Specific Request — Private volume ; You can request specific volumes 
either stating the serial number of the volumes you want, or by 
requesting the same volume used by an earlier data set. 

1. The format of the VOLUME parameter for requesting volumes by their 
serial numbers is: 



| VOLUME= (fpRIVATE, RETAIN II,, volcount, I SER= (serial, . . . ) ) 



'1 r# # vole ount ,1 

JL' J 



The PRIVATE subparameter is not needed when you make a specific 
volume request, because the system always considers specific tape 
volumes to be private volumes. You only need to code PRIVATE when 
you also code RETAIN. RETAIN means that the volume will not be 
demounted at the end of the step. If your data set has more than 
one volume, and the volumes are mounted in sequential order, only 
the last volume mounted is retained. (If more than one tape drive 
is available to the multivolume data set, the last volumes mounted 
are retained. ) 

Replace the term "volcount" with the maximum number of volumes the 
data set can use. You should only use this subparameter if you 
think your data set may use more volumes than those named in the 
SER subparameter. Note that "volcount" is the maximum number of 
volumes that can be used and not additional volumes. For example, 
if you name three volumes in the SER subparameter, but you think 
you may need two more volumes, replace "volcount" with 5. In this 
case, you are in effect making a specific request for three volumes 
and a nonspecific request for two volumes. 

The SER subparameter indicates that the serial numbers of the 
volumes you want for your data set will follow. Replace the term 
"serial" with the l-to-6 character serial number associated with 
the volume. If the volume serial number is not 6 characters,, it 
will be padded with trailing blanks by the system. The volume 
serial number can contain any alphameric and national characters 
and the hyphen. If it is necessary to include special characters, 
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other than a hyphen, in the volume serial number, enclose it in 
apostrophes, for example. 

If only one volume is involved you need not code the parentheses, 
for example, 

VOL=SER=ABCDEF 



In the following example you request that volumes AA22 and AB45 be 
assigned to the A99.F77 data set. Only one tape drive named TAPE 
will be used and the last volume used is to remain mounted at the 
end of the step. 

// VOLUME= ( PRIVATE, RETAIN,SER- ( AA2 2, AB4 5 )),... 

In the following example, the same data set, A99.F77, is defined, 
but the possibility that it may need one extra volume is indicated . 

//DD24 DD DSNAME=A99.F77,DISP=(,CATLG),UNIT==TAPE, 

// VOLUME= (PRIVATE, RETAIN t§ 3, SER= (AA22, AB45) ) , ... 

In the following example, you request that volumes ABC, BCD, and 
CDE be assigned to the RECORD data set. All three volumes are to 
be mounted in parallel on units of the group named TAPE7. 




C 

c 



Creating 



Magnetic 
Tape 



//DD25 DD DSNAME=REC0RD,DISP=(,KEEP>,UNIT=(TAPE7,P), 
// VOLUME=SER=(ABC,BCD,CDE),... 



Notes : 

• When using various typewriter heads or printer chains, difficulties 
in volume serial number recognition may arise if you use other than 
alphameric characters. 

• SCRTCH should not be used as a volume serial number, because it is 
used to notify the operator to mount a non-specific volume. 



2. The format of the VOLUME parameter for requesting volumes used by 
other data sets is: 



r t T~"i 

dsname 
VOLUME= ( ("PRIVATE, RETAIN | |, , volcount,] REF=\ *. ddname / ) 

I, II, J / *.stepname. ddname 

' * stepname.procstepname 

ddname t 



The PRIVATE and RETAIN parameters are used as described for 
VOLUME=SER. The REF subparameter designates only one volume. 
Therefore, if your data set requires more than one volume, you 
should indicate so with the "volcount" subparameter. Replace 
"volcount" with the maximum number of volumes for your data set. 

The REF subparameter identifies the volume assigned to an earlier 
data set. If the earlier data set resides on more than one tape 
volume, only the last volume is assigned to your data set. You can 
identify the earlier data set by its name or by making a backward 
reference. 



The DD statement 121 



You can identify the data set by its name only if it is a 
nontemporary cataloged data set or a nontemporary passed data set. 
If one of these conditions is met, replace the term "dsname" with 
the data set's name. The data set's name cannot contain special 
characters, except for periods in the case of qualified names. For 
example, 

VOLUME=REF=AB. CD. EF 

If the data set is not cataloged or passed, or if it has been 
assigned a temporary name, you can refer to it by making a backward 
reference to the DD statement that defined it. (This DD statement 
must be an earlier DD statement in your job.) Replace " ddname" 
with the name of the DD statement where the earlier data set is 
defined. Replace "stepname"' with the name of the EXEC statement of 
the step that has the earlier DD statement. If the earlier DD 
statement is contained in the same job step, omit the stepname, 
i.e. , 

VOLUME=REF= * . ddname 

The following example shows how to code the REF subparameter to use 
the volume specified in a DD statement in a previous step. The 
previous step defines a multi volume data set, therefore, only the 



r 

L 



//STEP5 EXEC... 

//DD1 DD UNIT=2400,VOLUME=SER= (75934, 34AB5, 1679M) 



//STEP7 EXEC. . . 

//DDA DD V0LUME=REF=*.STEP5.DD1, 



The following example shows how to code the REF subparameter to use 
the volume specified in a DD statement in a previous step. In 
addition to the volume used by the previous data set, the new data 
set may use three more volumes. 



//STEPC EXEC... 
V/DD1 DD VOLUME= (PRIVATE, RETAIN, SER=ABC111) ,. 



//DD5 DD V0LUME=(,,,4,REF=*.DD1),... 



When the earlier DD statement i& contained in a cataloged procedure 
step, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e., 

VOLUME=REF=* . stepname . proc stepname . ddname 



< 



122 JCL User's Guide (Release 20.1) 



The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the STEP9 EXEC 



j INPUT DECK 
J. j 



//STEP 9 EXEC PROC=ABC 



stepname 
//STEP12 EXEC... 
//DDA DD VOLUME=REF=*;STEP9.PHASE3.FILE 

proc stepname ^ 
ddnarae 





H 



//PHASE3^EXEC 

//FlLE'llD VOLUME=SER=123456, ... 




C 
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If you want to use the volume assigned to a kept data set defined 
in another job, you must use VOLUME=SER. 

When you request a volume using the REF subparameter, the system 
obtains unit type information from the referenced data set. The 
UNIT parameter is ignored if you code it in the same DD statement 
as REF. 



LABEL : The LABEL parameter is used to describe the type of label of the 
volume you selected with the VOLUME parameter. It is also used to 
indicate how many data sets, if any, precede your data set on the 
volume. The LABEL parameter is also used to assign a retention period 
and password protection to your data set, and to indicate whether this 
data set is to be used for input or output exclusively. The format of 
the LABEL parameter is: 



LABEL=( [sequence] 



L— 




, PASSWORD 
, NOPWREAD 

§ 



,IN ][,]rEXPDT=yydddl) 
»OUT [_RE!TPD=nnnn J 
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The first positional subparameter indicates the order of your data 
set on the tape volume. You only have to specify a sequence number if 
you make a specific volume request (VOL=REF or VOL=SER) and if your data 
set is not the first data set on the volume. If you do not specify a 
sequence number and there are other data sets on the volume, your data 
set will be written over the existing data sets. (If the existing data 
set was assigned a retention period or password protection, your data 
set will not be written and an error will result.) Replace the term 
"sequencei" with the sequence number of your data set. For example, if 
your data set is to be the fifth data set on the volume, code 



Note : If you request the system to bypass label processing (by 
specifying BLP in the second positional subparameter of the LABEL 
parameter), the system treats anything within tape marks as a data set. 
Therefore, if you want your data set to be written in the proper 
sequence, you must include all header and trailer labels and data sets 
that precede your data set in the sequence number subparameter. 

The second positional subparameter indicates the type of labels used 
for the specific volume you requested, or, if you are requesting a 
nonspecific volume, the type of labels you want on that volume. You can 
omit this subparameter if IBM standard labels are used. 

You must specify one of the following: 

SL 

if the data set has IBM standard labels. If you specify SL (or 
omit the second positional subparameter) the system can ensure that 
the specific volume you requested is mounted, because the volume 
serial number is written on the label. If you make a nonspecific 
request and the operator mounts a tape that does not have standard 
labels, the system asks the operator for the volume serial number 
and your name so that it can include this information on the new 
standard label. 

SUL 

if the data set has both IBM standard and user labels. If you 
specify SUL, the system can ensure that the specific volume you 
requested is mounted because the volume serial number is written on 
the label. 

if the data set has American National standard labels. These 
labels will be processed similarly to IBM standard (SL) labels. 
Refer to the IBM System/360 Operating System: Tape Labels 
publication for additional information. 

if the data set has both American National Standard labels and 
American National Standard user labels. Refer to the IBM 
System/360 Operating System: Tape Labels publication for 
additional information. 

if the data set has no labels. The operator must ensure that the 
specific volume requested is mounted, because the volume has no 
labels to indicate the serial number and the system cannot verify 
this information. If you make a nonspecific request and the 
operator mounts a volume with standard labels, you may use the 
volume provided: (1) the expiration date of any existing data set 
on the volume has passed, and (2) there are no password protected 
data sets on the volume. If either condition is not met, the 
system asks the operator to mount another volume. If you are 
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AL 



AUL 



NL 



< 



processing unlabeled ASCII tapes, you must specify OPTCD=Q in your 
DCB macro instruction or on the DD statement. 



NSL 



if the data set has nonstandard labels. Nonstandard labels are 
processed by installation-written routines. These routines must 
ensure that the specific volume requested is mounted. If you make 
a nonspecific request and the operator mounts a volume with 
standard labels, you may use the volume provided: (1) the 
expiration data of any existing data set has passed, and (2) there 
are no password protected data sets on the volume. If either 
condition is not met, the system asks the operator to mount another 
volume. 



BLP 



if you want to bypass label processing, BLP is useful if you want 
to use a blank tape or if you want to overwrite a seven-track tape 
that differs from your current parity or density specification. 
Your manager or supervisor should tell you if your system has the 
BLP facility. If it does not and you code BLP, the system assumes 
NL. 

The type of label used for tape volumes is determined by your 
installation. Most installations use only one type of labels. Check 
with your manager or supervisor before you specify a label type other 
than the type used in your installation. 

The third positional subparameter is used to specify password 
protection. If you code PASSWORD, the data set cannot be used by 
another job step or job unless the operator supplies the correct 
password. If you code NOPWREAD, the data set can be read without the 
password, but the operator must give the password before the data set 
can be changed, extended, or deleted. Password protected data sets must 
have standard labels; therefore, you must code the SL or AL subparameter 
or omit the second positional subparameter. For example: 

//DD26 DD DSNAME=OP EN. SESAME, DISP=(,CATLG, DELETE ),UNIT=24 00, 
// VOLUME=SER=SECRET, LABEL= ( , , PASSWORD) , . . . 

Before or after you create the data set you must tell the system 
programmer the name of your data set and the password. He will create 
an entry in a data set named PASSWORD containing those two items. 
Whenever a request is made for your data set the system will verify the 
password supplied by the operator against the entry in the PASSWORD data 
set. 
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The fourth positional subparameter (OUT) is used only if you coded 
your program in the assembler language or in FORTRAN. If you coded in 
the assembler language it allows you to override the specification of 
the OUT IN parameter in the OPEN macro instruction (for BSAM data sets 
only). If OUTIN is specified and you want the data set processed for 
output only code 



LABEL=(,,,OUT) 

If you are a FORTRAN user, OUT means that the set is to be processed for 
output only. 
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You can assign a retention period (length of time during which the 
data set cannot be changed or deleted without the operator's permission) 
to your nontemporary data set with either the RETPD=nnnn or EXPDT=yyddd , 

subparameter. These subparameters are keyword subparameters. You must \ 

code the one you choose after the last positional subparameter you code. 

LABELS ( , NSL, , OUT, EXPDT=7100) 

The RETPD subparameter expresses the retention period in terms of the 
number of days you want the data set retained. The format of RETPD is: 

RETPD=nnnn 

Replace "minn" with a number from 1 to 9999. 

The EXPDT subparameter states the expiration data of your data set. 
The format of EXPDT is: 

EXPDT=yyddd 

Replace "yyddd'* with the 2-digit year number and the 3-digit day number. 
For example, January 1, 1971 is coded as 

and February 1,1971 is coded as 

(Many calendars indicate the day number for each day of the year.) 

If neither RETPD or EXPDT is specified, a retention period of zero 
days is assumed; that is, your data set can be modified or deleted at 
anytime. Do not specify a retention period for temporary data sets, 
because they are always deleted at the end of the job step or the job. 

Data Attributes 

The DCB parameter allows you to specify data set attributes for your 
data set when your program is to be executed rather than when it is 
compiled. Any applicable attributes not specified in your program must 
be specified with the DCB parameter. However, in most cases, your 
compiler provides a default value for an attribute if you do not specify 
it in the program or in the DD statement. Other attributes are always 
given a fixed value by the compiler and you do not have to specify them 
at all. For example, you can select a buffering technique with the 
assembler, but all other IBM compilers select one for you when it is 
needed. 

DCB : You can use the DCB parameter to directly specify the attributes 
of your data set or to copy those attributes specified in a DD statement 
for another data set. 

The format of the DCB parameter for specifying the attributes is: 

.____ i 



| DCB=(list of attributes) 
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The attributes in the list are coded in the form of keyword 
subparameters separated by commas; for example, 

DCB=(BLKSIZE=300,LRECL=100) 



The valid subparameters that can be used with each compiler for magnetic 
tape data sets are shown in Table 10. Underscored items are those 
default values selected if you omit the subparameter. Default values 
are not shown where the attribute can be specified either in your 
program or in the DD statement. If values for a given subparameter are 
not shown, they are either specified in your source program or given a 
fixed value by the compiler. A glossary of DCB parameters is given in 
Appendix B. Code only those parameters that apply to your compiler as 
shown in Table 10. 

The format of the DCB parameter for copying the DCB parameter of a 
previous DD statement in your job is : 




| I*. ddname 

| DCB= ( J * . stepname. ddname 

| j * .stepname.proc stepname. ddname 



[ # list of attributes]) 



iC 



Creating 



-J f Magne 
\^ Tape 



gnetic 



Replace "ddname" with the name of the DD statement whose DCB parameter 
you want to copy. Replace "stepname" with the name of the EXEC 
statement of the step that contains that DD statement. If the DD 
statement you want to copy is contained in the same job step, omit the 
stepname, i-e.f DCB=*. ddname. The following example shows how to code 
the DCB parameter to copy the DCB parameter of a DD statement in 
previous step : 



//STEP2 EXEC... 

//DD1 DD...,DCB=(BLKSIZE=1600,LRECL=80) 



//STEP 4 EXEC... 

//COPY DD. ,.,DCB=*.STEP2.DD1 



I J 

The following example shows how to code the DCB parameter of a previous 
DD statement in the same step: 



r: 



1 



//STEPD EXEC... 
V/DDA DD.. . ,DCB=RECFM=F 



//DDC DD... # DCB=*.DDA 



Li 
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Table 10. DCB Subparameters for Creating a Data Set on Magnetic Tape 



00 



O 

a 

to 



c 



H 

CO 
(D 

to 
o 



DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


ANS COBOL •— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




ForD Hi 














BFTEK= 




S, E, or A ' — 
(QSAM only) 














BLKSIZE= 


number of bytes 


Li. 
number of bytes 




Ll 

number of bytes 


Ll 

number of bytes 


number of bytes 


number of bytes 


number of bytes 


BUFL= 




h_ 

number of bytes 














BUFNO= 




[i 
number of buffers 


number of buffers 


Ll 

number of buffers 


LL 

number of buffers 


1 or 2 


1 or 2 


Ll 

number of buffers 


Ll 

BUFOFF 




nor L 


n or L 


n or L 


n or L 


n or L 


n or L 


n or L 


DEN= 




0,1,2, or 3 "— 


0,1, or 2 *— 


Li 

0,1,2, or 3 L - 


Li 

0,1,2, or 3 L ~ 


Ll 

0,1,2, or 3 L — 


Li 

0,1,2, or 3 "— 


Li 

0,1,2, or 3 ■— 


EROPT= 




Ll 

ABE u_ 


ABE 


ABE 


ABE 








HIARCHY= 




Ll 
0or 1 














LRECL= 


number of bytes 


Ll 
number of bytes 








number of bytes 


number of bytes 


Li 

number of bytes 


NCP= 




number of channel 
programs (BSAM only) 












Li 

number of channel 
programs 
(BSAM only) 


CPTCD= 




[C][T] Ll 
[Q] (ASCII) 


[c] 

[Q] (ASCII) 


[c] 

[Q] (ASCII) 


[c] 


[c] 


[c] 

[Q] (ASCII) 


[c] Li 

[Q] (ASCII) 


RECFM= 


FJB 1 [A] [D] 


U 

V 

F 



A" 
M 

"b" 

S 
BS 

b" 

S 
BS 

W 


Li 

or 

[£]- 

LMjor 
[Aj 




D 




Formatted: 

u[aj 

V[B] [A] or 

fW R] 

D[B] [A] 
Unformatted : 


Formatted: 
u[Al or 

. V[BjAlor 
Unformatted : 

""El 


U 

V 

F 
D 


A" 
_M 

b" 

S 
BS 

b" 

S 

BS 

>] 


Ll 
or 

[i]- 


TRTCH= 




li 
C,E, ET, orT ' — 


C, E, ET, orT 


C, E, ET, or T 


C, E, ET, orT 


C, E, ET, orT 


C, E, ET, orT 


C, E, ET, orT 


This function can be specified in your program rather than in the DD statement. 
For QSAM, you must specify both BFALN and BFTEK on the DD statement or omit both. 

If DEN is omitted, 2 is assumed for 7^track, 2 is assumed for 9-track (one density), and 3 is assumed for 9-track (dual density). 
American National Standard COBOL. 
5 This parameter is specified only for ASCII data sets on magnetic tape. 



If you want to copy the DCB parameter of a DD statement contained in a 
cataloged procedure step, you must give both the name of the job step 
that invokes the procedure and the procedure step name, i.e., 

DCB=*.stepname.procstepname.ddname 

•Hie first part of the following example shows your input deck; the 
second part shows a cataloged procedured called by the ST2 EXEC 
statement in your deck. 
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If you want to modify the DCB subparameters you are copying add the new 
subparameters to the reference. The subparameters you specify will 
override the corresponding copied subparameters. For exdinpLe, 



//TAPE1 DD...,DCB=(BLKSIZE=160,LRECL= ! 80,OPTCI>=C,DEN=1 
//TAPE2 DD...,DCB=(*.TAPE1,DEN=2,RECFM=V) 



i.t-' ;, lll A'- fl11 : l „<fa. lll ;r» l ^ ll ' l '/ ll : -■■ l; ■-„*,!.,■ «, ■ ■■„;■ ■'■„, -^.—.-:_- _. *«.—«„: - — „ji 



Special Processing Options 

There are two special processing options for data sets on magnetic tape: 

1. You can request channel separation from other data sets in the same 
job step using either the SEP or the AFF parameter. 

2. You can suppress I/O operations on your data set using the DUMMY 
parameter . 
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SEP ; When two or more data sets are to be used in a job step, 
processing time may be shortened by requesting that the system transmit 
data sets over separate channels. For example, it would be faster to 
have your input data set and your output data set on separate channels 
than to have them on the same channel. 

You can request channel separation for data sets in each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type on different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with UNIT 
parameter. 

The format of the SEP parameter is: 



| SEP=(ddname,. .. ) 

L 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. The earlier DD statements can define 
any type of data set; new or existing, on magnetic tape or direct 
access, temporary or nontemporary, etc. 



In the following example, you request that the data set defined by the 
FOUR DD statement be assigned to a channel other than the ones assigned 
to the data sets defined by the ONE and TWO DD statement. The data sets 
defined by ONE and TWO may or may not be on the same channel. The data 
set defined by THREE may or may not be on the same channel as any of the 
other three data sets. 



V/PROGl EXEC PGM=PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE, LABEL=(,NL) 
//TWO DD DSNAME=SYSTEM. USER. ABC, DISP=OLD 
//THREE DD DSNAME=HELP, DISP= ( ,KEEP) , UNIT=2314, 
// V0LUME=SER=AFL,LABEL=RETPD=31 
//FOUR DD DSNAME=END,DISP=OLD,UNIT=2400-2, 
// VOLUME=SER=TAPE75,SEP=(ONE,TWO) 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 



V/PROGl EXEC PGM= PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL=(,NL) 
//TWO DD DSNAME=SYSTEM. USER. ABC, DISP=OLD 
//THREE DD DSNAME=HELP,DISP= ( ,KEEP) ,UNIT=231U , 
// VOLUME=SER=AFL,LABEL=RETPD=31, SEP=TWO 
//FOUR DD DSNAME=END,DISP=OLD,UNIT=2400-2, 
// VOLUME=SER=TAPE75,SEP=(ONE,TWO) 



As a result of this example, the data sets defined by ONE and TWO may 
or may not be on the same channel. The data set defined by THREE and 
FOUR may or may not be on the same channel, but neither one will be on 
the same channel as the data set defined by TWO. Also the data set 
defined by FOUR will not be on the same channel as the data set defined 



( 
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Remember -that the request for channel separation made with the SEP 
parameter is only a suggestion for more efficient operation, and not a 
requirement. If your data set must be on separate channels specify unit 
addresses with the UNIT parameter. You can obtain a configuration chart 
with all the unit addresses from your manager or supervisor. 



AFF: The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same separation using the AFF 
parameter for the later data sets. The AFF parameter tells the system 
that you want the data set defined in this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 



The format of the AFF parameter is; 



| AFF=ddname 

l 



Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separations. This data set and the earlier data set 
may or may not be on the same channel. 

In the following example, the data sets defined by DD1 and DD2 may or 
may not be on the same channel. The data sets defined by DD3 and DD5 
may or may not be on the same channel, but neither one will be on the 
same channel or channels as the data sets defined by DD1 or DD2. The 
data set defined by DDU will not be on the same channel as the data set 
defined by DD3, but it may be on the same channel as the data sets 
defined by DD1, DD2, or DD5. 
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//STEP EXEC PGM=METH0D2 



SEP=(DD1,DD2), . .. 

The requests for channel separation and affinity are only suggestions 
to the system. They will be honored if the appropriate devices are 
available. 



//DD1 


DD 


//DD2 


DD 


//DD3 


DD 


//DD4 


DD 


//DD5 


DD 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing programs ask to write the dummy 
data set, the write request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
writing of a data set until you are sure your program is going to 
produce meaningful output. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

//DD7 DD DUMMY, DSNAME=S6J0E,DISP=(, PASS), UNIT=TAPE7, 
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If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements sho** 

//DD7 DD DUMMY, DCB=TRTCH=ET 



When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to write the 
data set. For example, MM^^^^^^^^^^M 

// LABEL=(,SUL),DCB=TRTCH=ET 



DIRECT ACCESS DEVICES 

You can create five different kinds of data set on direct access 
devices: 

• Sequential data sets. 

• Direct data sets. 

• Partitioned data sets. 

• Generation data sets. 

• Indexed sequential data sets. 

The parameters shown in Table 7 are used to create those data sets. 
The definition of an indexed sequential data set may require up to three 
DD statements, and is discussed in Appendix A. The remaining four kinds 
of data sets are defined with only one DD statement. The way you use 
certain parameters indicates which kind of data set you are defining. 
These differences are summarized below and will be pointed out again 
when the parameters are discussed in the remainder of this topic. 

• Sequential data set — You use basically the same parameters used to 
define a data set on magnetic tape and you must also allocate space 
for the data set using one of the following parameters: SPACE, 
SPLIT, or SUBALLOC. 

• Direct data set — You use the same parameters as for a sequential 
data set, with the exception of the SPLIT parameter. If not 
specified in your program, you must write DSORG=DA or DSORG=DAU in 
the DCB parameter. 

• Partitioned data set — You use the same parameters as for a 
sequential data set, with the exception of the SPLIT parameter. You 
must code the number of directory blocks in the SPACE or SUBALLOC 
parameters. You can define the first member of the data set at the 
same time you allocate the partitioned data set. To do this use a 
special form of the DSNAME parameter, i.e., 

DSNAME=dsname (membername) 

To learn how to add more members to a partitioned data set,, refer to 1 
the section "Extending an Existing Data Set. " . ^ 
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• Generation data set. — You use the same parameters as for a 

sequential, partitioned, direct, or indexed sequential (if the data 
set is defined on one DD statement) data set. You must use a 
special form of the DSNAME parameter, i.e., 

DSNAME=groupname ( +number ) 

Generation data sets must be cataloged, i.e., 

DISP=(,CATLG) 

For further information on the different types of data set refer to 
"Section 3: Data Management" in IBM System/360 Operating System; 
Concepts and Facilities . Programs written in ALGOL or FORTRAN H cannot 
use direct data sets. Partitioned data sets can only be used by 
programs written in the assembler language. (Programs written in COBOL 
or FORTRAN can use partitioned data sets in a restricted way. For 
further information refer to the language Programmer's Guide . ) 




This section is summarized in Table 67 of Appendix D. /* 

( Creating 



Data Set Information ( Direct Access 

\ ^ Devices 

The DSNAME and DISP parameter are used to specify which type of data set 
you want to create. There are two types of data sets: temporary and 
nontemporary . A temporary data set is one that will be used for the 
duration of the jobstep or the job only . A nontemporar y data set is 
one that can be used not only by the jobsteps in your job, but by later 
jobs as well . There are three types of nontemporary data sets : 
cataloged data sets, kept (or noncataloged) data sets, and members of 
generation data groups. 

The following is a summary of the types of data sets that can be 
created on direct access devices : 

1. Temporary 

a. For the duration of the job (sequential, direct or 
partitioned) . 

b. For the duration of the jobstep (sequential, direct or 
partitioned) . 

2 . Nontemporary 

a. Cataloged (sequential, direct, or partitioned). 

b. Kept (or noncataloged) (sequential, direct or partitioned). 

c. Member of a generation data group. 

The formats of the DSNAME and DISP parameters for each type of data set 
are described below. 



Temporary — For the Duration of the Job : The formats of the DSNAME and 
DISP parameters are: 

I 1 

| DSNAME=j6&name \ , PI SP=( NEW, PAS S, DELETE ) j 

| JSname / | 

| J ££name( member name)! | 

| I Sname (member name) ) | 

L J 
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In the DSNAME parameter, replace the term "name" with any name not 
used by another temporary data set in the job. Each name consists of 
one to eight alphameric or national (a, $,#,) characters- However, the 
first character of the name must be a letter or national character. If 
you are creating the first member of a partitioned data set, add the 
member name after the temporary name. The member name is enclosed in 
parentheses and consists of one to eight alphameric or national 
characters. The first character must be a letter or national character. 
The system generates a name for the temporary data set, which begins 
with SYS and includes the jobname, the temporary name assigned in the 
DSNAME parameter, and other identifying characters. You can retrieve 
this data set later in the job by coding 

DSNAME= S S name 
DSNAME=Sname 

DSNAME= 66 name (membername) 
or 

DSNAME= 6 name (membername) 

in a DD statement, using the same name, or 

DSNAME= * . s te pname . ddname 

A double ampersand should be coded preceding the temporary name you 
assign to a data set. However, a name preceded by a single ampersand is 
treated as a temporary data set name, as long as no value is assigned to 
it either on an EXEC statement invoking a procedure, or a PROC statement 
within a procedure. If a value is assigned to it by one of these means, 
it is treated as a symbolic parameter. (Symbolic parameters are 
discussed in the section "The PROC Statement" and in "Part IV: 
Cataloged and In-stream Procedures.") 

In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. You do not have to code NEW as long as you 
indicate its absence by a comma. The PASS subparameter indicates that 
the temporary data set can be used by later steps in the job. The 
DELETE subparameter indicates that this data set is to be deleted if the 
job step abnormally terminates (ABEND) . You need not code DELETE 
because it is always assumed by the system for temporary data sets. 

For example, the parameters DSNAME and DISP in the following DD 
statement indicate that the temporary data set named AREA can be used by 

//DD1 DD DSNAME= S S AREA, DISP= ( , PASS ) , . . . 

In the following example the DSNAME parameter defines the first 

//DDA DD DSNAME= €&PDS( ONE ),DISP=(, PASS ), ... 



Temporary — For the Duration of the Job Step ; Both the DSNAME and DISP 
parameters can be omitted to indicate a temporary data set which will be 
deleted at the end of the job step. You can, if you wish, code the 
following: 

r _ , , ., 

I DSNAME=|6£name \ i , DISP= ( NEW. DELETE, DELETE ) ] | 

| l&name / | 

| I & 6name( membername) I | 

| 1 6 name (membername) ) | 

L 1 
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The temporary name in the DSNAME parameter is coded as described for 
temporary data sets for the duration of the job. All subparameter s of 
the DISP parameter are assumed if omitted. For example, the three 
following DD statements define the same data set: 



or 



or 



//DD2 DD DSNAME=6 SAREA,DISP= (NEW, DELETE, DELETE) , ... 



//DD2 DD DSNAME=&£AREA, . . . 



//DD2 DD... 



Note that the location parameters must still be coded in those 
statements . 



Nontemporary ~ Cataloged : The formats of the DSNAME and DISP 
parameters are : 



j DSNAME= /dsname. 



) , DISP= (NEW , CATLG [ ", CATLG "] 
\ dsname ( member name ) ( I , DELETE | ) 



r DELETE 
r KEEP J 
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In the DSNAME parameter, replace the term "dsname" with the qualified 
name you want to give to the data set. A qualified name is made up of 
several names that correspond to index levels in the catalog; each 
l-to-8 character name is separated by a period. Each name must begin 
with a letter or national (a,$,#) character. Any letter, number, 
national character, the hyphen and the +0(12-0 multipunch) can be used 
to complete each name. A qualified name can consist of 1 through 44 
characters (including periods). For example, 

DSNAME=AB . 33 . M. $7 . R257 9 AB2 

Each level of qualification must already exist as an index in the 
system catalog before you can request the system to catalog the data 
set. An index level is created using the IEHPROGM utility program. 
Once the indexes are established, the data set can be cataloged. If the 
name has no qualifiers (called an unqualified name), the system will 
create the index entry for you. For example. 



or 



DSNAME=C174B 



DSNAME=D 



If you are creating the first member of a partitioned data set, add 
the member name after the data set name. The member name is enclosed in 
parentheses and consists of one to eight alphameric or national 
characters. For example, 



or 



DS NAME-DATA . FILE ( G7 94 ) 



DSNAME=ALPHA < MW) 



In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. The NEW subparameter also indicates that you are 
requesting exclusive control of the nontemporary data set name specified 
in the DSNAME parameter for the data set. Exclusive control of the data 
set name means that no other job that requests the data set can be 



The DD Statement 135 



processed until the job with exclusive control terminates. This also 
means that the data set name is being exclusively controlled. If a 
request is made for the data set name, the request will not be processed 
— even though the request may refer to an entirely different physical 
data set. You do not have to code NEW as long as you indicate its 
absence by a comma. The CATLG subparameter indicates that the data set 
is to be cataloged. The third subparameter tells the system what is to 
be done with the data set if the step abnormally terminates (ABEND). If 
the data set name is either qualified or unqualified, you can specify 
CATLG or DELETE. CATLG is assumed if you omit the third subparameter. 
If the data set name is unqualified, you can specify KEEP as the third 
subparameter. KEEP tells the system that if the step ABENDS you want 
the data set kept intact (but not cataloged) until a later job requests 
that the data set be deleted or until the expiration date has passed. 
(You can specify a retention period or expiration date in the LABEL 
parameter. ) 

In the following example, a new partitioned data set named DATE. FILE 
is to be cataloged. Its first member, JAN,, is being created at the same 

//DD20 DD DSNAME=DATE.FILE( JAN ),DISP=(, CATLG),... 

If you wish to include the first member at a later time, simply code: 

//DD21 DD DS NAME= DATE. FILE, DISP=(, CATLG) ,... 

In the following example, a new data set named SYSTEM. FILE1 is to be 
cataloged. If the step abnormally terminates it will also be cataloged. 

In the following example, a new data set named AREA#5 is to be 
cataloged. If the step abnormally terminates, it will be kept. 

//DD4 DD DSNAME=AREA#5,DISP=(, CATLG, KEEP),... 



Nontemporary — Kept : The formats of the DSNAME and DISP parameters 
are: 



| DSNAME=(dsname ) ,DISP=( NEW , KEEP T, KEEP ~| ) | 

| \dsname(membername)J I, DELETE J | 

| L* CATLG J I 

L ± J 

In the DSNAME parameter, replace the term "dsname" with the 
unqualified name you want to give to the data set. The name can contain 
from 1 to 8 characters. The first character must be a letter or a 
national character (a, $,#). Any letter, number, national character, the 
hyphen and the +0(12-0 multipunch) can be used to complete the name. 

If you are creating the first member of a partitioned data set, add 
the member name after the data set name. The member name is enclosed in 
parentheses and consists of one to eight alphameric or national 
characters. The first character must be a letter or nation character. 

DSNAME=STORE($FILE) 
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In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. The NEW subparameter also indicates that you are 
requesting exclusive control of the nontemporary data set name specified 
in the DSNAME parameter for the data set. Exclusive control of the data 
set name means that no other job that requests the data set can be 
processed until the job with exclusive control terminates. This also 
means that the data set name is being exclusively controlled. If a 
request is made for the data set name, the request will not be processed 
— even though the request may refer to an entirely different physical 
data set. You do not have to code NEW as long as you indicate its 
absence by a comma. The KEEP subparameter indicates that the data set 
is to be kept intact (but not cataloged) until a later job step or job 
requests that the data set be deleted or until the expiration date has 
passed. (You can specify a retention period or expiration date in the 
LABEL parameter.) The third subparameter tells the system what is to be 
done with the data det if the step abnormally terminates (ABEND) . You 
can specify KEEP, DELETE or CATLG. KEEP is assumed if you omit the 
third subparameter. 




In the following example, a new data set named RTW is to be kept; 
the step ABENDS, it will also be kept. 



If 
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In the following example a new partitioned data set named RRC is to 
be kept. Its first member, ACS, is being created at the same time. 



In the following example, a new data set named TWO is to be kept, 
the step ABENDS it will be cataloged. 



If 



//DD6 DD DSNAME=TWO,DISP=(, KEEP, CATLG), 



Notes : 



You can give a disposition of PASS to a new data set with an 
unqualified name. For example, 

DSNAME=DATA, DISP= ( , PASS) 

Such a data set can become a temporary, cataloged, or kept data set 
according to the disposition you give to it in a later DD statement. 
See "Passed Data Sets" in "Retrieving an Existing Data Set." If the 
data set is not referred to by a later DD statement in the job, it 
is deleted at the end of the job. 

You can use special characters as part of the qualified data set 
name if you enclose the name in apostrophes. For example, 

DSNAME= , AB=750 i 

If the special character is an apostrophe, you must code it as two 
consectutive apostrophes. For example, code NAT'L as 

DSNAME= , NAT^ •L* 



Do not use special characters if the data set is to be cataloged or 
if it contains d membername. 
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Nontemporary — Member Generation Data Group ; A cataloged data set that 
is periodically processed can be grouped with its earlier generations to 
form a named generation data group. The entire group has a generation 
group name. Each member of the group can be addressed by a simple 
generation number. The last generation produced before the start of 
your job has a generation number of 0. The generation produced before 
the last one is —1. The generation you are going to produce in your job 
is +1. After your job ends, the generation you produced automatically 
becomes generation 0. If you produce more than one generation in your 
job, you must name them +1, + 2, +3, etc. After your job, the highest 
generation number you produced, say +3, becomes generation 0, +2 becomes 
-1 and +1 becomes -2. 

For further information on creating generation data groups, refer to 
Appendix D of the publication IBM System/360 Operating System Job 
Control Language Reference . The formats of the DSNAME and DISP 
parameters for creating a new member of a generation data group are: 



j DSNAME=groupname (4 number) , DISP= ( NEW , CATLG [ ", CATLG "]) | 

, delete! j 



[ NEW , CATLG Hi 

L' 



In the DSNAME parameter, replace the term "groupname" with the name 
of the generation data group. The name can contain from one to eight 
characters. The first character must be a letter or national character 
(a,$,#). Any letter, number, national character, the hyphen, and the +0 
(12-0 multipunch) can be used to complete the name. The groupname can 
be a qualified name. The qualified name can contain up to 35 characters 
(including periods). Replace the term "number'' with the number of the 
generation you are creating. If you are only creating one generation in 
your job, this number will be 1. For example, 

DSNAME=MASTER ( + 1 ) 



If you are creating more than one generation in your job, number each 
generation consecutively. For example, DSNAME=MASTER(+1) , 

In the DISP parameter, the NEW subparameter indicates that you are 
creating the data set. The NEW subparameter also indicates that you are 
requesting exclusive control of the nontemporary data set name specified 
in the DSNAME parameter for the data set. Exclusive control of the data 
set name means that no other job that requests the data set can be 
processed until the job with exclusive control terminates. This also 
means that the data set name is being exclusively controlled. If a 
request is made for the data set name, the request will not be processed 
— even though the request may refer to an entirely different physical 
data set. You do not have to code NEW as long as you indicate its 
absence by a comma. The CATLG subparameter indicates that the new 
generation is to be cataloged. (This subparameter is required.) The 
third subparameter tells the system what is to be done with the data set 
if the step abnormally terminates (ABEND) . You can specify CATLG or 
DELETE. CATLG is assumed if you omit the third subparameter. 

In the following example, two new generations are added to the a 

DATE. FILE generation data group. If the step abnormally terminates the m 
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//STEP EXEC PGM=, 



//DD7 DD DSNAME= DATE. FILE (+1) , DISP=(,CATLG, DELETE), 
//DD8 DD DSNAME=DATE .FILE ( +2 ) , DISP= ( , CATLG , DELETE) , 



After your job is successfully completed DATE. FILE (+2) becomes 
DATE.FILE(O), and DATE.FILEC+1) becomes DATE.FILE(-l) . 



Location of the Data Set 



The UNIT, VOLUME and LABEL parameters are used to describe the location 
of your data set. The UNIT parameter indicates the kind of direct 
access device you want, and, if your data set is to occupy more than one 
volume, it indicates how many units are needed. The VOLUME parameter 
lets you request a public volume (or volumes) , or a private volume (or 
volumes). You can request a specific volume or you can let the system 
assign you a volume. The LABEL parameter describes the tape label of 
the volume used for your data set. You must allocate space to a 
sequential data set using either the SPACE, SPLIT or SUBALLOC parameter; 
to a partitioned or direct data set using either the SPACE or SUBALLOC 
parameter; and to a generation data set using the SPACE parameter. 
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UNIT : The format of the UNIT parameter is: 



j (unit address) 
| UNIT=( J device type [ 
J (groupname \ 

L 



, unit count 
.P 



]■■ 



SEP= (ddname ,...)]) 



The first positional subparameter identifies the direct access device 
you want to use for your data set by its address, or unit name, or group 
name. 

unit address 

is the actual machine address of the direct access device. For 
example, UNIT=190. You should not specify the address unless you 
are sure you want it. Do not specify the address if you are going 
to need more than one unit for the data set. (Multiple units are 
requested with the second subparameter of the UNIT parameter. ) To 
request a specific bin on a specific 2321, you should write 

UNIT=address/bin 
where "bin" is a number from to 9. For example, 

indicates that you want bin 7 of the 2321 unit located at address 
you are requesting any one of the available bins on that device. 
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device type 

corresponds to the type of device. Coding the device type provides 
you with a certain degree of device independence in that your data 
set may be placed in any number of devices of the same type. For 
example, if you code UNIT=2311, your data set will be placed on any 
2311 Disk Storage Drive. The following device types can be 
specified. 

Device Type Description 

2301 2301 Drum Storage Unit 

2302 2302 Disk Storage Drive 

2303 2303 Drum Storage Unit 

2305-1 2305 Fixed Head Storage Facility Model 1 

2305-2 2305 Fixed Head Storage Facility Model 2 

2311 Any 2311 Disk Storage Drive 

2319 * 2319 Disk Storage Facility 

2314 2314 Storage Facility 

2321 Any bin mounted on a 2321 data cell drive 

3330 3330 Disk Storage Drive 

*To indicate the 2319 in the UNIT parameter, specify UNIT=2314. 
However, to designate the 2319 as the particular device for your 
data set, specify UNIT—unit address. 

group name 

is the name of a collection of devices, selected by your 
installation during system generation. For example, your 
installation might select the name DISK for all disk drives in the 
configuration. If you do not care which drive is used for your 
data set, you should code UNIT=DISK. Your manager or supervisor 
should tell you which group names were generated for your 
ins t all at ion . 

The second positional subparameter is used only if your data set 
will occupy more than one volume and if you want more than one of 
these volumes to be mounted at the same time. This subparameter 
indicates how many drives are to be used for mounting your data 
set's volumes. 

unit count 

indicates how many units you want assigned to the data set. You 
can specify a maximum of 59 units per DD statement. Make sure 
that your system has at least the number of units you specify- 
Otherwise an error will result. If you specify fewer units than 
the number of volumes in your data set, only the same number of 
volumes as there are units can be mounted at the same time. (If 
you request fewer units than volumes code the PRIVATE subparameter 
in the VOLUME parameter.) If you specify the same number of units 
as there are volumes, all volumes can be mounted at the same time. 

(If you think your data set may use more volumes than you expect, 
you should indicate the maximum number of volumes that can be used 
with the volume count subparameter of the VOLUME parameter. Do 
not request any more units than the maximum number of volumes you 
specify.) For example, if you code UNIT- (2301,2) , your data set 



specifies parallel mounting. When you request parallel mounting 
the system counts the number of serial numbers specified with the 
VOLUME parameter. If, in addition to indicating specific serial 
numbers in the VOLUME parameter, you also indicate a maximum 
number of volumes that can be used by the data set, the number of 
units assigned is the number of volumes that can be used. 



140 JCL User's Guide (Release 20.1) 



SEP 

is the last positional subparameter. It is used when you want a 
different direct access device assigned to your data set from the 
ones assigned to previous data sets in the same job step. This 
parameter is used only when a previous data set made a nonspecific 
volume request for the same type of device, because the system can 
assign more than one data set to the same direct access device. 
(Note that you would be contradicting yourself if you made 
specific requests to place two or more data sets on the same 
volume and then requested unit separation for those data sets.) 
To identify the data sets that should not be assigned the same 
device as this data set, follow SEP= by a list of up to eight 
ddnames of the DD statements that define these data sets. The 
listed DD statements must precede this statement and must be 
contained in the same job step . The list of ddnames must be 
enclosed in parentheses unless there is only one ddname. If one 
of the listed DD statements defines a dummy data set, the system 
ignores the unit separation request for that data set. 

In the following example the DDAA DD statement defines a temporary 
data set that needs 10 tracks on a volume that can be mounted on a 2311. 

tracks on a volume that can also be mounted on a 2311. The EDCC DD 
statement also defines a temporary data set that needs 20 tracks on the 
same type of volume but requests that the volume assigned to it be 
mounted on a different 2311 unit than those assigned to the first two 
data sets. As a result of these DD statements the first two data sets 
may or may not use the same 2311, but the third data set will not use 
the same 2311 as either of the first two data sets. 
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| //STEPB EXEC... 

| //DDAA DD UNIT=2311,SPACE=(TRK,10) 

| //DDBB DD UNIT=2311,SPACE=(TRK, 50) 

| //DDCC DD UNIT=(2311,SEP= (DDAA, DDBB) ) ,SPACE=(TRK, 20) 



When you make a specific volume request for a data set and request 
unit separation for that data set, the system issues a message to the 
operator if the request for unit separation cannot be satisfied. The 
operator decides if the system should wait for devices to become 
available, or if the request for unit separation should be ignored, or 
if the job should be cancelled. When you make a nonspecific volume 
request for a data set and request unit separation for that data set, 
the request may be ignored, depending on how many disk drives are 
available and how much space is available on those disk drives. A 
message will not be issued in this case if unit separation cannot be 
satisfied. 



Do not confuse the SEP subparameter of the UNIT parameter with the 
SEP parameter . The former requests unit separation while the latter 
requests channel separation. 

Note ; You need not code the UNIT parameter when: 

• The data set is to use the same volume assigned to an earlier data 
set, that is, if you specify VOLUME=REF. 

• The data set is to share space or cylinders with an earlier data 
set, that is, if you specify SUBALLOC or SPLIT. 

In both cases, you can use the UNIT parameter if you want more units 
assigned. 
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VOLUME : The VOLUME parameter lets you request a specific volume for 
your data set or lets the system assign your data set a suitable volume 
( nonspecific request). When you make a nonspecific request the system 
will look for a volume that both fits the device specified with the UNIT 
parameter and has the amount of space you specified with the SPACE,, 
SPLIT, or SUBALLOC parameter available, and will then allocate that 
amount of space to your data set. When you make a specific request, you 
must make sure that the volume you requested has enough space for your 
data set. If it does not have enough space the job step will ABEND. 

You can request a public or a private volume with either a specific 
or nonspecific request. A volume is designated public or private by the 
installation, a public volume is one that can be allocated to a 
temporary data set when a nonspecific volume request is made and PRIVATE 
is not coded in the VOLUME parameter. A private volume is one that 
cannot be allocated to a temporary data set when a nonspecific volume 
request is made and PRIVATE is not coded in the VOLUME parameter. The 
key word in the preceding definitions is "nonspecific. " If you make a 
specific request you can get any volume - public or private - allocated 
to your data set provided there is enough space on that volume. 
However, if you make a specfic request for a public volume, remember 
that temporary data sets that make nonspecific requests can be allocated 
on the same volume. (If you want more information on the different, 
types of volume and how they are allocated read the description of the 
VOLUME parameter in IBM System/360 Operating System: Job Control 
Language Reference . A distinction is made, in that publication between 
public and storage volumes; for the purposes of this publication both 
are called public volumes . ) 

The following is a summary of the types of volume requests that can 
be made for new data sets on direct access devices: 

1. Nonspecific request 

a. Public volume 

b. Private volume 

2. Specific request 

a. Public volume 

b. Private volume 

Before discussing the four types of requests in detail, a word must 
be said on multi volume data sets on direct access devices. Normally, 
all direct access data sets are allocated on only one volume. This is 
because the amount of space (primary quantity) you specify with the 
SPACE, SPLIT, or SUBALLOC parameter is allocated entirely on one volume. 
There is, however, a way of extending your data set to more volumes. 
You can allocate a "secondary quantity" to your data set in the SPACE, 
SPLIT, or SUBALLOC parameter. When the space you requested as "primary 
quantity" is used up, the system allocates the amount you request as 
"secondary quantity" to your data set. If the "secondary quantity" is 
used up, the system again allocates your data set another "secondary 
quantity", and so on. The system will try to allocate the "secondary 
quantity" on the same volume as the "primary quantity". However, if 
there is not enough space available on the first volume the system will 
allocate the "secondary quantity" on another volume provided you request 
more than one volume with the VOLUME parameter. If you do not request 
more volumes or if the data set exceeds the volumes you request, the job 
step abnormally terminates ■, (ABEND) . You request more volumes either by 
specifying more than one serial number with the SER subparameter or by 
using the volcount subparameter, or both. There is no point in 
requesting more than one volume if you do not specify a "secondary 

142 JCL User's Guide (Release 20.1) 



quantity" because the "primary quantity" must be completely allocated on 
one volume. Also, you do not have to request more than one volume if 
you know that any "secondary quantity" allocated will fit in the same 
volume as the "primary quantity". 

Partitioned data sets must be contained on only one volume. 



Nonspecific Request — Public Volume ; The format of the VOLUME 
parameter depends on whether you need one volume or more than one 
volume. 

1. If your data set needs space on only one public volume, omit the 
VOLUME parameter. For example, if you have a temporary data set 

//DASD1 DD UNIT=2314,SPACE=(TRK,10) 

If you have a data set named AREA that is to be cataloged and you 
want 5 cylinders on a 2311 volume, write: 

//DASD2 DD DSNAME=AREA,DISP=(,CATLG),UNIT=2311,SPACE=(CYL,5) 

2. If your data set may require more than one volume, code: 
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I VOLUME= ( , , , volcount ) 



Replace the term "volcount" with the number of volumes required for 
your data set. You should request the same number of devices with 
the "unit count" subparameter of the UNIT parameter as you request 
volumes. If the number of volumes requested exceeds the number of 
devices, you should code PRIVATE as described in "Nonspecific 
Request/Private Volume." 

For example, if you have a temporary data set named &SDATA that is 
to be passed to other steps in your job and you are requesting 300 
tracks of a 2311 as primary quantity and 100 tracks as secondary 
quantity, code: 

// V0LUME=(, , ,2) ,SPACE=(TRK, (300,100)) 

If you expect the same data set (S6DATA) to need a maximum of four 
vo lume s , c ode : 

// VOLUME= ( , , , 4) ,SPACE=(TRK, (300,100)) 



Nonspecific Request — Private Volume : If you make a nonspecific 
request for a private volume the system assigns an available volume to 
you. Later data sets that make a nonspecific request will not be 
assigned to this volume. 

The format of the VOLUME parameter for making a nonspecific volume 
request for a private volume is: 



VOLUME= (PRIVATE 



, RETAIN 



[, , vol count]) 
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The PRIVATE subparameter is required. The RETAIN subparameter means 
that the volume will not be demounted at the end of the step. (RETAIN 
has the same effect on volume mounting as coding PASS in the DISP 
parameter.) Private volumes are demounted at the end of the step unless 
it is an unremovable volume,, such as a 2301, or unless it has been 
designated by your installation to be a permanently resident volume, for 
example, the system residence volume. It is recommended that you use 
the RETAIN subparameter whenever you want the volume to remain mounted 
at the end of the step. 

For example, if you want 20 tracks of a nonspecific private 2314 

If you want five 100-byte blocks allocated to a data set named 
JOE. DOE, and you want the volume to remain mounted at the end of the 

//DASD5 DD DSNAME=JOE.DOE,DISP=(,CATLG),UNIT=DISK, 



If your data set needs more than one volume replace the term 
"volcount" with the number of volumes needed. If the number of volumes 
is equal to the number of devices requested in the unit parameter all 
volumes are mounted at the same time. When the number of volumes is 
greater than the number of devices requested, and all the mounted 

volumes are used up, the system demounts one of the volumes and then 
mounts another volume in its place so that processing can continue. If 
you specify RETAIN, the volumes mounted at the end of the step remain 
mounted. 

For example, if a temporary data set has a primary allocation of 1500 
tracks and secondary allocation of 1500 tracks and you think it may need 
up to five private volumes to be mounted on two 2311 drives, code 

//DASD6 DD UNIT=(2311, 2) ,VOLUME= < PRIVATE, , ,5), SPACE=(TRK, (1500,1500)) 

Using the preceding example, if you want the last two volumes used to 

// SPACE=(TRK, (1500,1500)) 



Note ; If you specify KEEP for your nontemporary data set, ask the 
machine operator to tell you the serial number of the volume assigned to 
your data set. You need the serial number to retrieve your data set in 
later jobs. 

Specific Request — Public Volume ; You can request specific volumes by 
either stating the serial number of the volumes you want, or by 
requesting the same volume used by an earlier data set. 

1. The format of the VOLUME parameter for requesting volumes by their 
serial numbers is : 

r t 

| VOLUME= (t,,, volcount, lSER=( serial, ...)) j 

L .J 

Replace the term "volcount" with the maximum number of volumes the 
data set can use. You should only use this subparameter if you 
think your data set may use more volumes than those named in the 
SER subparameter. Note that "volcount" is the maximum number of 
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volumes that can be used and not additional volumes. For example, 
if you name three volumes in the SER subparameter, but you think 
you may need two more volumes, replace "volcount" with 5. In this 
case, you are in effect making a specific request for three volumes 
and a nonspecific request for two volumes. You should request the 
same number of devices with the "unit count" subparameter of the 
UNIT parameter as you request volumes. If the number of volumes 
requested exceeds the number of devices, you must code PRIVATE as 
described in "Specific Request — Private Volume". 

The SER subparameter indicates that the serial numbers of the 
volumes you want for your data set will follow. Replace the term 
"serial" with the l-to-6 character serial number associated with 
the volume. If the volume serial number is not 6 characters, it 
will be padded with trailing blanks by the system. The volume 
serial number can contain any alphameric and national characters 
and the hyphen. If it is necessary to include special characters, 
other than a hyphen, in the volume serial number, enclose it is 
apostrophes, for example, 

VOLUME=SER= < 54AB2, ' 6/10/8 • ) 

If only one volume is involved you need not code the parentheses, 
for example. 

In the following example, two cylinders of a 2314 volume named 
231405 are requested for a temporary data set: 

V/DASD10 DD UNIT=2314,VOLUME=SER=231U0 5,SPACE=(CYL,2) 

In the following example you request that volumes ABC111 and ABC222 
be assigned to the FILE. ONE data set. Two direct access devices of 
the group named DISK will be used. The data set has a primary 
allocation of 1000 tracks and a secondary allocation of 500 tracks. 

// VOLUME=SER= (ABC111,ABC2 2 2 ) ,SPACE= (TRK, (1000,500)) 

In the following example, the same data set, FILE. ONE is defined, 
but the possibility that it may need one extra volume is indicated. 
In this case, three devices must be assigned. 

// VOLUME= (,,, 3, SER=(ABC111,ABC22 2 )),SPACE= (TRK, (1000,500)) 
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In the following example, you request that volumes 12 5, 769 and 8 42 
be assigned to the BETA data set. All three volumes are to be 
mounted in parallel on units named DASD. A primary allocation of 
2000 tracks and a secondary allocation of 5 00 tracks are made 

// VOLUME=SER= (125, 769, 842),SPACE= (TRK, (2000,500)) 



Notes : 



Do not request parallel mounting when you code the "volcount" 
subparameter unless you code PRIVATE. 

When using various typewriter heads or printer chains, difficulties 
in volume serial number recognition may arise if you use other than 
alphameric characters. 

SCRTCH should not be used as a volume serial number, because it is 
used to notify the operator to mount a non-specific volume. 
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2. The format of the VOLUME parameter for requesting volumes used by 
other data sets is: 



j jdsname . j 

| |*.ddname I | 

j VOLUME= ( [ , , , volcount , ] REF= j * . s tepname . ddname j ) j 

| ' * . stepname .procstepname . ddname J j 

i '. j 

The REF subparameter identifies the volumes assigned to an earlier 
data set. If the earlier data set resides on more than one volume, 
all the volumes are assigned to your data set. If your data set 
needs more volumes, you should indicate so with the "volcount" 
subparameter. Replace "volcount" with the maximum number of 
volumes that can be used for your data set. When you use the REF 
subparameter, the system obtains UNIT information from the 
definition of the previous data set. However, if you are 
specifying additional volumes, you must use the UNIT parameter to 
specify the same number of units. For example. 



VOLUME= ( , , , 5, REF=ABC . DATA) , UNIT= ( , 5) 



If you specify additional volumes but do not want to specify 
additional units, you must code PRIVATE as described in "Specific 
Request — Private Volume." 

You can use the REF subparameter to identify the earlier data set 
by its name or by making a backward reference. You can identify 
the data set by its name only if it is a nontemporary cataloged 
data set or a nontemporary passed data set. If one of these 
conditions is met, replace the term "dsname" with the data set r s 
name. The data set's name cannot contain special characters, 
except for periods in the case of qualified names. For example, 

If the data set is not cataloged or passed, or if it has been 
assigned a temporary name, you can refer to it by making a backward 
reference to the DD statement that defined it. (This DD statement 
must be an earlier DD statement in your job.) Replace "ddname" 
with the name of the DD statement where the earlier data set is 
defined. Replace "stepname" with the name of the EXEC statement of 
the step that has the earlier DD statement. If the earlier DD 
statement is contained in the same job step, omit the stepname, 

VOLUME=REF=* . ddname 

The following example shows how to code the REF subparameter to use 
the volume specified in a DD statement in a previous step. 



//STEP 5 EXEC... 

//DD1 DD UNIT=2314,V0LUME=SER=RFS167 



//STEP7 EXEC... 

//DDA DD V0LUME=REF=*.STEP5.DD1, 
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The following example shows how to code the REF subparameter to use 

addition to the volumes used by the previous data set, the new data 
set may use three more volumes. The UNIT parameter is used to 
override the number of units assigned in the first DD statement. 



//STEPC EXEC... 

//DD1 DD VOLUME=SER=< 123456, 789012), UNIT=<2311, 2), ... 



V/DD5 DD V0LUME=(,,,5,REF=*.DD1),UNIT=(,5), ... 






When the earlier DD statement is contained in a cataloged procedure 
step, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e., 
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VOLUME=REF=* . s tepname . pr oc stepname . ddname 



The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the STEP9 EXEC 



— v 

I 



I INPUT DECK 
h " 



//STEP9 EXEC PROC=ABC 



stepname >s. 

//STEP12 EXEC... ^^ / A 
V/DDA DD VOLUME-REF=*.STEP9.PHASE3.FILE 



CATALOGED PROCEDURE 




I 

\ 1 




//PHASE3 EXEC 

//FILE DD VOLUME=SER=123456,... 



If you want to use the volume assigned to a kept data set defined 
in another job, you must use VOLUME=SER. 



The DD Statement 147 



Specific Request — Private Volume ; You can request specific volumes by 
either stating the serial number of the volumes you want, or by 
requesting the same volume used by an earlier data set. 

1. The format of the VOLUME parameter for requesting volumes by their 
serial numbers is: 



r " ■ 1 

J VOLUME= ( PRIVATE | , RETAI N \ [ , , volcount , ] SER= (serial , . . . ) ) j 

I 



[.„„«],.. 



The PRIVATE subparameter is required. The RETAIN subparameter 
means that the volume will not be demounted at the end of the step. 
(RETAIN has the same effect on volume mounting as coding PASS in 
the DISP parameter. ) Private volumes are demounted at the end of 
the step unless it is an unremovable volume, such as a 2301, or 
unless it has been designated by your installation to be a 
permanently resident volume, for example, the system residence 
volume. It is recommended that you use the RETAIN subparameter 
whenever you want the volume to remain mounted at the end of the 
step. 

For example, if you want 10 cylinders of a private 2314 volume 

//DASD14 DD UNIT=2314, VOLUME= (PRIVATE, SER=SYS333) , SPACE= (CYL, 10) 

If you want 20 tracks of a private 2311 volume named SYS007 for a 
at the end of the step, code: 

// VOLUME=( PRIVATE, RETAIN, SER=SYS 007) ,SPACE= (TRK,20) 

If your data set needs more than one volume, replace the term 
"volcount" with the number of volumes needed. If the number of 
volumes is equal to the number of devices requested in the unit 
parameter all volume are mounted at the same time. When the number 
of volumes is greater than the number of devices requested,, and all 
the mounted volumes are used, the system demounts one of the 
volumes and then mounts another volume in its place so that 
processing can continue. If you specify RETAIN, the volumes 
mounted at the end of the step remain mounted. 

The SER subparameter is coded as described for "Specific Request — 
Public Volume." 

In the following example, 50 tracks of a private 2301 volume named 
2301AA are requested for a cataloged data set named RAY. 

// VOLUME^ (PRIVATE, SER=2301AA) , SPACE=(TRK, 50) 
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In the following example, a temporary data set has a primary 
// SPACE=(TRK, (500,250)) 



Using the preceding example, if you want the last volume used to 
remain mounted at the end of the job, code 

//DASD17 DD UNIT=2311, VOLUME= (PRIVATE, RETAIN, ,3, SER=RFS300) , 

In the following example a temporary data set named &&JIM has a 
primary allocation of 2500 tracks and a secondary allocation of 
1500 tracks. These tracks should be allocated on two 2314 volumes 
named A17932 and A17936 that will mounted in parallel. 

// V0LUME=(PRIVATE,SER=(A17932,A17936)), 

// SPACE=(TRK, (2500,1500)) 
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Using the preceding example, you may wish to indicate that a 
maximum of four volumes will be used. Volumes A17932 and A17936 
will still be mounted in parallel. When an additional volume is 
needed, the system will demount a volume and replace it with 
another. Volumes are not demounted at the end of the job step 

// VOLUME= (PRIVATE, ,,4, SER=(A17932, A17936) ,SPACE=(TRK, 

// (2500,1500)) 



The format of the VOLUME parameter for requesting volumes used by 
other data sets is : 



dsnante 
* . ddname 
VOLUME= ( PRIVATE f, RETAIN~| [ , , vol count , ] REF= { * . stepname . ddname 

*. stepname. procstepname. 

ddname 



1 1 






The PRIVATE subparameter is required. The RETAIN subparameter 
means that the volume will not be demounted at the end of the step. 
(RETAIN has the same effect on volume mounting as coding PASS in 
the DISP parameter.) Private volumes are demounted at the end of 
the step unless it is an unremovable volume, such as a 2301 drum, 
or unless it has been designated by your installation to be a 
permanently resident volume, for example, the system residence 
volume. It is recommended that you use the RETAIN subparameter 
whenever you want the volume to remain mounted at the end of the 
step. 
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The REF subparameter identifies the volumes assigned to an earlier 
data set. If the earlier data set resides on more than one. volume., 
all the volumes are assigned to your data set. If your data set 
needs more volumes, you should indicate so with the "volcount" 
subparameter. Replace "volcount" with the maximum number of 
volumes that can be used for your data set. When you use the REF 
subparameter the system obtains UNIT information from the previous 
data set. However, you can use the UNIT parameter to assign 
additional units. For example, 

VOLUME=(PRIVATE,,,U, REF =SYST. NINE) ,UNIT=(,3) 

The REF subparameter is coded as described for "Specific Request — 
Public Volume." 



The following example shows how to code the REF subparameter to use 
the volume specified in a DD statement in a previous step. 



J//STEP5 EXEC... 

|//DD1 DD UNIT=2301,VOLUME=SER=75934 



J//STEP7 EXEC... 

|//DDA DD VOLUME= (PRIVATE, REF=*. STEP5.DD1) , . . . 



The following example shows how to code the REF subparameter to use 
the volumes specified in a DD statement in a previous step. In 
addition to the volumes used by the previous data set, the new data 
set may use three more volumes. The UNIT parameter is used to 



J//STEPC EXEC... 

J//DD1 DD VOLUME=(PRIVATE,RETAIN,SER=(ABClll,ABC321)) 

|// UNIT=(231U,2) 



|//DD5 DD VOLUME-( PRIVATE, , ,5,REF=*.DD1) ,UNIT=< , 3) , . . . 



When the earlier DD statement is contained in a cataloged procedure 
step,, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e., 

VOLUME-REF=* . stepname . proc stepname . ddname 
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The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the STEP9 EXEC 
statement in your job. The new data set requests a maximum of 7 
volumes . 



INPUT DECK 



//STEP9 EXEC PROC=ABC 

"stepname 

//STEP12 EXEC... 

//DDA DD VOLUME=REF (PRIVATE, ,,7, REF=*7STEP9,-PHASE3._FILE) 

procstepname 

ddname 



i 




//PHASE3 EXEC 

//FILE DD VOLUME=SER= (123456, 654321), UNIT= (2311, 2) 



. . j 
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If you want to use the volume assigned to a kept data set defined 
in another job, you must use VOLUME=SER. 



LABEL ; The LABEL parameter is used to describe the type of label of the 
volume you selected with the VOLUME parameter- (The labels of direct 
access data sets are called data set control blocks (DSCB) . The DSCBs 
are part of the volume table of contents (VTOC) which is the volume 
label.) The LABEL parameter is also used to assign a retention period 
and password protection to your data set, and to indicate whether this 
data set is to be used for input or output exclusively. If the volume 
has standard labels you may omit this parameter. The format of the 
LABEL parameter is : 



LABEL=( 



#SL " 
,SUL 
,AL 
,AUL 



", PASSWORD" 
, NOPWREAD 



,IN 
,OUT 



]'■ 



HEXPDT=yyddd)) 
(RETPD=nnnn / 



The first positional subparameter indicates the order of your data 
set on a tape volume; for direct access devices, you code a comma 
indicating the absence of this subparameter. 

The second subparameter indicates the type of labels used for the 
specific volume you requested,, or, if you are requesting a nonspecific 
volume, the type of labels you want on that volume. You can omit this 
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SUL 



AL 



AUL 



subpara meter if standard labels are used. You must specify one of the 
following: 

SL 

if the data set has standard labels. 

if the data set has both standard and user labels. 

if the data set has American National Standard labels. 

if the data set has both American National Standard labels and 
American National Standard user labels. 

The type of label used is determined by your installation. Most 
installations use only one type of labels. Check with your manager or 
supervisor before you specify a label type other than the type used in 
your installation. 

For direct access devices, the third positional subparameter is used 
to specify password protection. If you code PASSWORD, the data set you 
are creating cannot be used by another job step or job unless the 
operator can supply the system with the correct password. If you code 
NOPWREAD, the data set can be read without the password, but the 
operator must give the password before the data set can be changed, 
extended, or deleted. Password protected data sets must have standard 
labels; therefore, you must code the SL subparameter or omit this 
subparameter if the data set is to have standard labels. For example: 

//DD26 DD DSNAME=HUSH. HUSH, DISP=( , CATLG, DELETE), UNIT=2301, 

Before or after you create the data set you must tell the system 
programmer the name of your data set and the password. He will create 
an entry in a data set named PASSWORD containing those two items. 
Whenever a request is made for your data set the system will verify the 
password supplied by the operator against the entry in the PASSWORD data 
set. 

The next positional subparameter (IN or OUT) is used only if you 
coded your program in the assembler language or in FORTRAN. If you 
coded in the assembler language it allows you to override the 
specification of the OUTIN parameter in the OPEN macro instruction (for 
BSAM data sets only). If OUTIN is specified and you want the data set 
processed for output only code: 

LABEL=(,,,OUT) 

If you are a FORTRAN user, OUT means that the data set is to be 
processed for output only; IN means that the data set is to be processed 
for input only. 

You can assign a retention period (length of time during which the 
data set cannot be changed or deleted) to your nontemporary data set 
with either the RETPD=nnnn or EXPDT=yyddd subparameter. These 
subparameter s are keyword subparameters . You must code the one you 
choose after the last positional subparameter you code. For example. 



LABEL= ( , , ,IN, RETPD=34) 
LABEL= ( , SUL, EXPDT =6 9 2 51 ) 
LABEL= (,, PASSWORD, RETPD=100) 
LABEL= ( , SUL, , OUT , EXPDT=71 ) 
LABEL=RETPD=*170 
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The RETPD subparameter expresses the retention period in terms of the 
number of days you want the data set retained. The format of RETPD is: 



RETPD=nnnn 

Replace "nnnn" with a number from 1 to 9999. 

The EXTPD subparameter states the expiration date of your data set. 
The format of EXPDT is: 

EXPDT=yyddd 

Replace "yyddd" with the 2-digit year number and the 3-digit day number. 
For example, January 1, 1971 is coded as 

and February 1, 1971 is coded as 

(Many calendars indicate the day number for each day of the year. ) 

If neither RETPD or EXPDT is specified, a retention period of zero 
days is assumed. That is, your data set can be modified or deleted at 
anytime. Do not specify a retention period for temporary data sets, 
because they are always deleted at the end of the job step or the job. 
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Size of the Data Set 

You must specify the size of your data set using the SPACE, SPLIT or 
SUBALLOC parameter. The parameter you use depends on the type of data 
set. 



Data set 

Sequential 
Direct 
Partitioned 
Generation 



You can use 

SPACE; SPLIT, or SUBALLOC 
SPACE,, or SUBALLOC 
SPACE, or SUBALLOC 
SPACE 



The SPACE parameter lets you specify the space required for your data 
set. The SPLIT and SUBALLOC parameters are used when your data set is 
sharing space with other data sets. 

The SPLIT parameter is used when your step has two or more data sets 
having corresponding records. You can minimize access arm movement by 
defining split cylinders. In the split-cylinder mode each data set is 
given a certain number of tracks on each cylinder allocated. You must 
use the SPLIT parameter in each of the DD statements that define the 
data sets that are to split the cylinders. 

The SUBALLOC parameter lets you use the technique of suballocation . 
Subal location allows you to reserve a contiguous area of space on one 
volume and to place a series of data sets in a certain sequence in that 
area. Suballocation allows you to mimimize access-arm movement when 
data sets are processed serially. DD statements for the data sets that 
are to share that area must use the SUBALLOC parameter. 
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The SPACE, SPLIT and SUBALLOC parameters let you specify the amount 
of space needed for your data set as a primary quantity . If you think 
your data set may need some extra space either during the current job 
step or at some future time, you can specify a secondary quantity . If 
your data set exceeds the space in the primary quantity, the system 
allocates the space in the secondary quantity. If the secondary 
quantity runs out, another secondary quantity is allocated, and so on. 
The primary quantity is completely allocated on one volume. The system 
will try to allocate the secondary quantity on the same volume. If 
there is not enough space left on that volume, the system will allocate 
the secondary quantity on another volume provided you requested more 
than one volume with the VOLUME parameter. If you do not request more 
volumes or if the data set exceeds the volumes you requested the job 
step ABENDS. The job step will also ABEND if the primary quantity does 
not fit on the volume or if the data set exceeds the primary quantity 
and you did not specify a secondary quantity. (If you made a specific 
volume request with the VOLUME parameter, you must make sure there is 
enough space on the volume requested for the primary quantity. If there 
isn't, your step will ABEND. If you made a nonspecific volume request, 
the system will find a volume that has enough space for the primary 
quantity. ) 

In the SPACE and SUBALLOC parameters, you can specify the space 
required for your data set in units of tracks, cylinders, or blocks. In 
the SPLIT parameter you specify it in units of cylinders, or blocks. 

Table 11 shows the capacities of the different direct access devices. 
Table 12 shows the number of given-length records that can fit into a 
track. Table 12 is divided into two parts since the capacity varies 
depending on whether the record's format has keys. (For more 
information on direct access data sets refer to Introduction to IBM 
System/360; Direct Access Storage Devices Organization Methods , 
GC20-1649.) 

The following example illustrates how to use the tables. Suppose you 
are writing a data set on a 2311 volume. This data set consists of 
80- byte records grouped in blocks of 5 records. Therefore, each block 
has 400 bytes. You expect to write 2000 blocks, for a total of 800,000 
bytes. A 2311 volume has over 7 million bytes, therefore, your data set 
will fit in one volume. According to Table 12, you can write seven 
UOO-byte blocks on each track. You can allocate the space in one of the 
three following ways: 

1. Units of blocks ; You request 2000 400-byte blocks as follows; 

2000/7=286 tracks (round up) 

3. Units of cylinders ; There are 10 tracks in each 2311 cylinder 
286/10=29 cylinders (round up) 
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If you think your data set may need 50 more blocks you can make a 

1. Units of blocks : A secondary allocation of 50 blocks is requested 
as follows s 

50/7=8 tracks (round up) 
You request the secondary allocation as follows: 

3- Onits of cylinders : 
8/10=1 (round up) 




( Creating 
You request the secondary allocation as follows: ^ 



\ ^ Devices 
For most efficient performance , request space in units of cylinders . 
However, if you need to conserve space, be sure the cylinder is 
reasonably full. For example, it would be waste of space to request one 
cylinder on a 2302 for a data set that only needs two 2302 tracks. 

For greater device independence , request space in units of blocks . 
The system calculates for you number of tracks or cylinders needed. The 
following considerations apply when you are requesting space in terms of 
blocks : 

• The blocksize cannot exceed 65,535. 

• If you have variable-length records (or blocks) give the average 
record (or block) length as the block size. You must specify the 
maximum record length in the BLKSIZE subparameter of the DCB 
parameter. 

• If your blocks are written with keys, give the key length in the 
KEYLEN subparameter of the DCB parameter. 

In addition to the primary quantity, partitioned data sets require a 
directory quantity . (A secondary quantity can also be specified for 
partitioned data sets.) The directory quantity is the number of 
256 -byte blocks that are to be contained in the directory of the 
partitioned data set. Each block contains from 3 to 21 entries. There 
must be one entry for each member name and for each alias in the 
partitioned data set. The length of the entries depends on the length 
of a user's data field. For example, if your partitioned data set has 
20 members and each member has aliases, you need 60 entries. If you can 

allocation in blocks, tracks, or cylinders. For example. 

For more information on partitioned data sets,, refer to IBM 
System/360 Operating System: Data Management Services . 
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Table 11. Direct Access Capacities 
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Track 



20,483 
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7,294 
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229,264 



48,920 



36,250 






145,880 



4.09 
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225.59 
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7.25 
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2305 



3330 



Strip 
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Model 1: 
Disk j 4 8 
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I I 96 

| Disk j 40 4 | 19 



2,000 
14,136 
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Model 2: 



Model 1: 
113,088 
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|14,660| 117,280] 11.3 

| 13, 030| 247,570| 101.6 

JL -L J. 



H 



♦There are 25 logical cylinders in a 2301 Drum. 
**A volume is equal to one bin in a 2321 Data Cell 



156 JCL User's Guide (Release 20.1) 



Table 12. Track Capacity 
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SPACE; 



The SPACE parameter lets you request space for your data set in 



one of two ways: 

1. You can request the quantity of space and let the system assign 
specific tracks, or 

2. You can request specific tracks. 



The system assigns tracks : The format of the SPACE parameter for 
letting the system assign specific tracks is: 



SPACE=(]CYL 



block length 



., (primary quantity 



", secondary quantity I 
,CONTIG" 



[, directory 3) 



*,rlse1 



, MXIG 
,ALX 



[, ROUND]) 



L .. , J 



The first positional parameter indicates whether you are requesting 
space in tracks (TRK), cylinders (CYL), or blocks. If you are using 
blocks, replace the term "block length" with average block length of 
your data. Replace the term "primary quantity" with the amount of space 
you desire in the units you have chosen- The system tries to allocate 
the primary quantity in contiguous tracks or cylinders. If contiguous 
space is not available, the system satisfies the space request with up 
to five noncontiguous blocks (extents) of space. You can override these 
system actions by coding the CONTIG, MXIG, or ALX subparameter. If you 
want additional space allocated to your data set when the primary 
quantity runs out, specify a "secondary quantity." As with the primary 
quantity, the system will try to allocate the secondary quantity in 
contiguous tracks or cylinders. If this is not possible, the system 
will allocate the secondary quantity in up to five extents. 

If you are defining a partitioned data set, you must define a 
"directory quantity." Replace the term "directory quantity" with the 
number of 256-byte blocks you need for the directory. If you code a 
directory quantity but do not request a secondary quantity, indicate the 
absence of a secondary quantity with a comma. 

If you are only coding the primary quantity you need not enclose it 

In the following example you request 30 cylinders for your data set. 
If the data set needs more space you want the system to allocate 5 more 
cylinders at a time: 

SPACE=(CYL, (30,5)) 



In the following example you request 300 2000-byte blocks for your 
partitioned data set. The directory needs 50 256-byte blocks. 

Using the previous example, if you also want to make a secondary 
SPACE~( 2000, (300,10,50)) 
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The RISE positional subparameter allows you to release unused space 
when you are finished writing the data set. If space was requested in 
terms of tracks, space is released starting with the first unused track. 
If space was requested in terms of cylinders, space is released starting 
with the first unused cylinder. If space was requested in terms of 
blocks, any unused tracks or cylinders, whichever the system allocated 
to the data set, are released. Any released space is available for 
allocation to other data sets. You can use the RLSE subparameter and 
still be able to update your data set at a later time if you specify a 
secondary quantity for the data set. For example, if you code 

SPACE= (CYL, (10,2) ,RLSE) 



10 cylinders will be allocated to your data set. If you use only 9 
cylinders, the remaining cylinder is released. If during a later job 
step or job you want to update the data set, two cylinders (secondary 
allocation) will be allocated to your data set each time you need more 
space. If you have specified RLSE and an ABEND occurs, unused space is 
not released. If you do not code the RLSE subparameter, and other 
subparameters follow, you must indicate its absence by a comma. 

The next positional subparameter allows you to override the system's 
allocation technique. The system tries to allocate space in contiguous 
track or cylinders. If contiguous space is not available, the system 
satisfies the space request with up to five noncontiguous blocks of 
space (extents). If a user label is requested, the system allocates up 
to four noncontiguous blocks of space. You can choose one of the 
following to override these actions. 




C 
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CONTIG (contiguous) 

specifies that the space allocated to the data set must be 
contiguous.' If the request cannot be satisfied, the job is 
terminated. For example, 

SPACE= (TRK, (50,, 2),, CONTIG) 

requests 50 contiguous tracks for your partitioned data set. 

MXIG (maximum contiguous) 

requests the largest area of contiguous space available on the 

volume that is at least as large as the primary quantity. This 
subparameter applies only to the primary space allocation. For 

and there are three blocks of unused space on the volume — a 10 
cylinder block, a 12 cylinder block, and a 20 cylinder block — the 
system will assign your data set the 20 cylinder block even if you 
only requested ten. MXIG is useful when your data set is likely to 
exceed the primary quantity requested. 

ALX (all extents) 

requests up to five different areas of contiguous space. If a user 
label is requested,, the system allocates up to four blocks of 
space. Each area is at least as large as the primary quantity. 
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The system allocates as many areas as are available. For example, if 

and there are fours blocks of unused space on the volume — a 
120-track block, a 200-track block, a 35-track block, and a 
155-track block — the system will assign the 120-200- and 
155-track blocks to your data set. If your data set still needs 
more space, a secondary allocation of 20 tracks is made on the 
remaining 35 tracks. If more space is still needed, the system 
will allocate 20 more tracks on another volume, provided you 
request more than one volume with the volume parameter. ALX is 
useful when your data set requires an unusually large amount of 
space. 

Because of the unpredictably large amounts of space that can be 
allocated to a data set with the MXIG or ALX subparameter, RLSE is often 
coded at the same time to return all unused space to the system. RLSE 
can also be coded with CONTIG. 

If you request space on a specific volume, you must determine whether 
there is enough contiguous space for the primary allocation, because if 
there isn't your step will abnormally terminate. If you make a 
nonspecific request, the system will ensure that you get enough space on 
a volume for your primary allocation. In either case, if you need a 
very large amount of space (especially if you are using ALX) you should 
consider requesting a large secondary quantity at the same time. A 
secondary allocation will let the system obtain space on more than one 
volume, if necessary. 

If you do not specify CONTIG, MXIG, or ALX, and the ROUND 
subparameter follows, you must code a comma to indicate their absence. 

The ROUND subparameter is used only when you request space in terms 
of blocks . ROUND requests that the allocated space be equal to one or 
more whole cylinders. The system computes the number of tracks needed 
to hold the blocks and ensures that the space begins on the first track 
of a cylinder and ends on the last track of a cylinder. For example, if 

UNIT=2311,SPACE=( 400, 2000,,, ROUND) 

the system will assign you 29 whole cylinders, rather than 28.6 
cylinders (286 tracks). 

All other subparameters (except TRK and CYL) can be coded with ROUND. 



Requesting Specific Tracks ; A data set can be placed in a specific 
position on a direct access volume by requesting space in terms of a 
quantity and track number. This absolute track allocation technique is 
recommended only for location-dependent data sets. 

The format of the SPACE parameter for requesting specific tracks is: 

r— ; : 

| SPACE=(ABSTR, (primary quan tity, address [ , directory] )) 

I ; . ; 

The ABSTR subparameter is required. Replace the term "primary 
quantity" with the number of tracks you desire, and "address" with the 
relative track address of the beginning track. Relative track numbers 
are based on the first track of the first cylinder being defined as 0. 
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(Track cannot be requested.) Count through the tracks of each 
cylinder until you reach the track on which you want the data set to 
start. Table 11 will help you to perform this calculation. The system 
automatically converts the relative track number to an address based on 
the particular device assigned. 

For example, if you want 50 tracks beginning with the third track of 
the second cylinder of a 2311 volume, code. 

SPACE=(ABSTR, (50,12)) 

If you want 10 tracks beginning with the fourth track of the first 
cylinder of a 2314 volume, code 

SPACE=(ABSTR, (10,3)) 

If the data set is a partitioned data set, replace 
the number of directory blocks required. 



'directory" with 



If the tracks you request have already been allocated to another data 
set, or the data set exceeds the space available on the volume, the job 
is terminated. A secondary quantity cannot be specified when you 
request specific tracks. 

Note : Since a secondary quantity cannot be coded with the ABSTR 
subparameter, the absolute track allocation technique cannot be used to 
create a multi volume data set. 
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SPLIT : When a job step involves one or more sequential data sets having 
corresponding records, you can minimize access arm movement by defining 
split cylinders. In the split-cylinder mode each data set is given part 
of the tracks on every cylinder allocated. For example, if you want to 
allocate space to three data sets on a 2311 volume using the 
split-cylinder mode, you could allocate 15 cylinders to be shared by the 
three data sets. The first data set would occupy the first four tracks 
of each cylinder; the second data set would occupy the next five tracks; 
and the third data set would occupy the last track of each cylinder. 
(There are 10 tracks in each 2311 cylinder.) 

The cylinders allocated to the data sets must be on one 2302, 2311, 
2314 or 2321 volume. If there are not enough cylinders available on the 
volume to satisfy the request, the job is terminated. The space 
occupied by a data set residing on a cylinder that has been split is not 
available for reallocation until all data sets sharing the cylinder are 
deleted. (If the SPLIT parameter is used to allocate space for data 
sets that are to reside on a drum storage volume, space is allocated for 
the data sets, but the data sets are not stored using the split cylinder 
mode.) 

To split cylinders among two or more data sets, you must arrange the 
associated DD statements in sequence in the input stream. The first DD 
statement in the sequence specifies the portion of the space required by 
the first data set and the total amount of space required for all data 
sets. Each succeeding DD statement requests a portion of the total 
space. You can specify a secondary quantity on the first DD statement 
in the sequence. If any of the data sets in the group exceeds its 
space,, additional space is allocated in the amount of the secondary 
quantity. The additional space applies only to the data set that ran 
out of space, and is not split with the other data sets in the group. 
If a secondary quantity is not specified and one of the data sets in the 
group runs out "of space, the job step ABENDS. 

The SPLIT parameter lets you request space in units of cylinders or 
in units of blocks. 
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Units of Cylinders : The format of the SPLIT parameter for the first 
data set in the sequence is: 

i ' • 1 

| SPLIT=(n,CYL, (primary quantity [, secondary quantity] )) | 

L -J 

Replace "n" with the number of tracks per cylinder you want allocated 
to the first data set. The CYL subparameter is required. Replace 
"primary quantity" with the total number of cylinders to be allocated 
for use by all the data sets in the group. Replace "secondary quantity" 
with the number of cylinders to be allocated to any data set in the 
group that runs out of space. 

The format of the SPLIT parameter for each succeeding data set in the 
sequence is: 

r 1 

| SPLIT=n j 

L . J 



Replace "n" with the number of tracks per cylinder you want allocated 
to this data set. Be careful that the total number of "n" quantities 
specified for the data sets in the group is not greater than the number 
of tracks per cylinder. You can omit the VOLUME and UNIT parameters 
from all DD statements after the first of the group. If you code them, 

they are ignored. 

In the following example three cataloged data sets named ABC. ONE, 
ABC. TWO and ABC. THREE are to split 50 cylinders on a private 2314 volume 
named VOL097 . ABC. ONE is to have seven tracks on each cylinder; ABC. TWO 
is to have 9 tracks; and ABC. THREE is to have the remaining four tracks 
of each cylinder. Two more cylinders can be allocated to any of the 
three data sets that runs out of space. 

// SPLIT=<7, CYL, (50,2)) 

//DD2 DD DSNAME=ABC.TW0,DISP=(,CATLG),SPLIT=9 



l— 



Units of Blocks : When you specify space in units of blocks, the system 
computes how many cylinders to allocate. Instead of specifying how many 
tracks each data set is to have, you specify which percentage of the 
cylinder each data set is to have. 

The format of the SPLIT parameter for the first data set in the 
sequence is: 



| SPLIT=(%,,block length, (primary quantity [, secondary quantity])) 



Replace "%" with a number from 1 to 99. This number represents the 
percentage of tracks per cylinder you want allocated to the data set. 
Replace "block length" with the average block length of your data. 
Replace "primary quantity" with the total number of blocks to be 
allocated for use by all the data sets in the group. Replace "secondary 
quantity" with the number of blocks to be allocated to any data set in 
the group that runs out of space. (The system rounds up the secondary 
quantity to an integral- number of cylinders.) 
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The format of the SPLIT parameter for each succeeding data set in the 
sequence is : 



| SPLIT= 

L 



Replace "%" with a number from 1 to 99, this number representing the 
percentage of tracks per cylinder you want allocated to this data set. 
The total number of percentages allocated to the data sets in the group 
must not be greater than 100. You can omit the VOLUME and UNIT 
parameters from all DD statements after the first of the group. If you 
code them they are ignored. 

In the following example, four temporary data sets named 
&£ALPHA,SSBETA, SSDELTA, and S6GAMMA are to split 200 1024-byte blocks 
on a public 2321 volume. 6SALPHA is to have 10% of each cylinder; 
SSBETA is to have 25%; SSDELTA is to have 50%; and SfcGAMMA is to have 



//DDA DD DSNAME=SS ALPHA, DISP=(, PASS), UN IT=2321, 

// SPLIT=(10,1024, (200)) 

//DDB DD DSNAME=6S BETA, DISP=(, PASS), SPLIT=25 

//DDC DD DSNAME=&&DELTA,DISP=(,PASS) ,SPLIT=50 

;//DDD DD DSNAME=&& GAMMA, DISP=(, PASS ),SPLIT=1 5 
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SUBALLOC : Suballocation allows you to place a series of data sets in a 
certain sequence in a contiguous area of one direct access volume. This 
reserved area is defined with a DD statement using the SPACE parameter. 
The DD statements for the data sets that share that area must use the 
SUBALLOC parameter to request a portion of the area. All DD statements 
must be in the same job. 

Defining the Reserved Area : The reserved area is a sequential data set. 
This data set must be used for suballocation purposes only; that is, you 
must not write any data in the data set. You must use the following 
SPACE parameter to request space for the area: 



(TRK 
SPACE=( JCYL 

(block 



1 ength 



, primary quantity, , CONTIG) 



You can request space in units of tracks, cylinders, or blocks. The 
"primary quantity" must be large enough to contain all the primary 
quantities of the suballocated data sets. (The suballocated data sets 
can request secondary quantities, but any secondary quantity will be 
allocated outside of the reserved area.) The CONTIG subparameter is 
required because the reserved area must be contiguous. 

On this same DD statement, you can request more than one device (UNIT 
parameter) and volume (VOLUME parameter). If you do this, a 
suballocated data set that exceeds its primary quantity can have its 
secondary quantity allocated on another volume. 

If any of the suballocated data sets is to be kept or cataloged, you 
should specify 

DISP=(,KEEP) 
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for the reserved area. (It is not necessary to catalog it, but you may 
do so if you wish.) If all the suballocated data sets are temporary, 
you can specify 

DISP=(,PASS) 

for the reserved area. 

Suballocated Data Sets : The DD statements for the suballocated data set 
must be in the same job as the DD statement for the reserved area. The 
DD statement for the reserved area must precede those of the 
suballocated data sets. Each data set is assigned the next portion of 
unused space from the reserved area. 

You can omit the UNIT and VOLUME parameters from the DD statements 
for the suballocated data sets. If you code them they are ignored. 

You must use the SUBALLOC parameter to request space for each 
suballocated data set. 

i " 1 

(TRK ) 

SUBALLOC= ( ] CYL (, (primary quantity r, secondary quantity"] 
(block length) [_, J 

! ddname ) 

stepname^ ddname |) 

stepname. procstepname. ddname) 

L , J 

You can request the suballocated space in units of tracks, cylinders, 
or blocks. (You can use a different unit for each suballocated data 
set; the system will perform the appropriate calculations.) Replace the/ 
term "primary quantity" with the amount of space you desire in the units 
you have chosen. If there is not enough space in the reserved area for 
the primary quantity, the job will ABEND. If you want additional space 
allocated to your data set when the primary quantity runs out, specify a 
"secondary quantity". The secondary quantity will not be allocated 
within the reserved area, but on available space elsewhere on the 
volume. If you requested more devices and volumes (with the UNIT and 
VOLUME parameters) in the DD statement for the reserved area, the 
secondary allocation could be made on another volume. (You must request 
more devices in addition to more volumes because the volume that 
contains the reserved area cannot be demounted until all requests in the 
job for suballocation have been satisfied.) If you are defining a 
partitioned data set, you must define a "directory quantity." Replace 
the term "directory quantity" with the number of 256-byte blocks you 
need for the directory. If you code a directory quantity but do not 
request a secondary quantity, indicate the absence of the secondary 
quantity with a comma. 

The last positional parameter identifies the DD statement that 
defines the reserved area. Replace "ddname" with the name of the DD 
statement of the reserved area. Replace "stepname" with the name of the 
EXEC statement of the step that has the DD statement of the reserved 
area. If the earlier DD statement is in the same jobstep, omit the 
stepname. 

When the DD statement that defines the reserved area is in a 
cataloged procedure, you must give both the name of the job step that 
invokes the procedure and the procedure step name, i.e., 
stepname. procstepname. ddname . 

In the following example, the reserved area is defined with the DD 
statement named ONE in STEP1 . The name of the reserved area is AREA, 
and it will occupy 150 cylinders of a 2314 volume named LOUISE. The DD 
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statement. TWO in STEP1 defines a cataloged data set named SUE. ONE. 
SUB. ONE requests the first 200 tracks of AREA. The DD statements named 
THREE and FOUR in STEP 2 define nontemporary data sets named ALPHA and 
BETA. ALPHA is a partitioned data set that requests 110 cylinders of 
AREA. Seven directory blocks are needed for ALPHA. BETA is a 
sequential data set that needs 1000 1024-byte blocks. Should BETA need 
more space, a secondary allocation of 50 blocks can be made outside of 
AREA. 



//STEP1 EXEC PGM=BLURB 

//ONE DD DSNAME=AREA,DISP=(,KEEP),UNIT=2314, 

// VOLUME=SER=LOUISE , SPACE= (CYL, 150 , ,CONTIG) 

//TWO DD DSNAME=SUB.ONE,DISP=(,CATLG), 

// SUBALLOC=(TRK, (200), ONE) 

//STEP2 EXEC PGM=BLA 

//THREE DD DSNAME=ALPHA,DISP= (,KEEP) , 

// SUBALLOC=(CYL, (110,, 7) , STEPl.ONE) 

//FOUR DD DSNAME=BETA,DISP=(,KEEP) , 

// SUBALLOC= (1024, (1000,5 0) ,STEP1. ONE) 



Data Attributes 

The DCB parameter allows you to specify data set attributes for your 
data set when your program is to be executed rather than when it is 
compiled. Any applicable attributes not specified in your program must 
be specified with the DCB parameter. However, in most cases, your 
compiler will provide a default value for an attribute if you do not 
specify it in the program or in the DD statement. Other attributes are 
always given a fixed value by the compiler and you do not have to 
specify them at all. For example, you can select a buffering technique 
with the assembler, but all other IBM compilers select one for you when 
it is needed. 
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DCB : You can use the DCB parameter to directly specify the attributes 
of your data set, or to copy those attributes specified for a cataloged 
data set or in a DD statement for another data set. 

The format of the DCB parameter for specifying the attribute is : 



| DCB=(list of attributes) 

L 



The attributes in the list are coded in the form of keyword 
subparameters separated by commas; for example, 

DCB= ( BLKS IZ E= 3 , LRECL= 10 ) 

The valid subparameters that can be used with each compiler for 
sequential, direct, and partitioned data sets are shown in Tables 13, 
14, and 15 respectively. Underscored items are those default values 
selected if you omit the subparameter. Default values are not shown 
where the attribute can be specified either in your program or in the DD 
statement. If values for a given subparameter are not shown, it is 
either specified in your source program or given a fixed value by the 
compiler. A glossary of DCB parameters is given in Appendix B. Code 
only those parameters that apply to your compiler as shown in Tables 13, 
14, and 15. Programs written in ALGOL cannot use direct data sets. 
Partitioned data sets can only be used by programs written in assembler 
language. 
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Table 13. DCB Subparameters for Creating a Sequential Data Set on 
Direct Access Devices 



DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


I 3 
ANS COBOL *— 


FORTRAN E 


FORTRAN G&H 


PL/I F 


BFALN= 




ForD III! 














BFTEK= 




S, E,orA k? 
(QSAM only) 














BLKSIZE= 


number of bytes 


Ll 

number of bytes 




number ot bytes 


number of bytes 


number of bytes 


number of bytes 


Ll 

number of bytes 


BUFL= 




h 

number of bytes ' — 














BUFNO= 




number of buffers ■ — 


number of buffers 


number of buffers 


Ll 

number of buffers 


1 or 2 


1 or 2 


|_L 

number of buffers 


DSORG= 




Li 

PS or PSU *— 














EROPT= 




h 
ABE •— 


ABE 


ABE 


ABE 








HIARCHY= 




or 1 Li- 














KEYLEN= 




h 

number of bytes ' — 












Ll 

number of bytes 


LRECL= 


number of bytes 


Lu 

number- of bytes — 






- 


number of bytes 


number of bytes 


Ll 

number of bytes 


NCP= 




h 
number of channel ' — 

programs (BSAM only) 












number of 1 — 
channel programs 
(BSAM only) 


OPTCD= 




1 [W] [C] [T] 


MH 


[w] [c] 


M [c] 


h 


Cc] 


[w] [c] 


RECFM- 


£ [bs] [A][t] 


U 
V 

F 


"b 

S 

T 

BS 

BT 

ST 

BST 

"b 

S 

T 

BS 

BT 

ST 

BST 


\] c 

[a] 
[m] 

[a" 
[m 


>r 
or 








Formatted : 
U[a][t] or 
V[B][A][T] or 

f&TaTt] 

Unformatted: 

VS[b] [m] [T] 


Formatted : 
UfA"|[T] or 

[mJ 

V[B]["A"|[T] or 
|_MJ 

F[BjfAl[T] 

L M J 

Unformatted: 
VS[B]JA|[T] 


U 
V 
F 


a" 

_M_ 

~B~ 

S 

_BS_ 

"b" 

S 
BS 


or 

[m 

IV 
1 M . 


Ll 


This function can be specified in your program rather than in the DD statement. 

For QSAM, you must specify both BFALN and BFTEK on the DD statement or omit both. 
3 
American National Standard COBOL. 
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DCB 
Subparameter 


Assembler 


COBOL E 


COBOL F 


ANS COBOL 1 — 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 


h 
ForD L — 














BFTEK= 


R 














BLKSIZE= 


Ll 

number of bytes 












Ll 

number of bytes 


BUFL= 


Ll 

number of bytes 














BUFNO= 


LL 

number of buffers 








1 or 2 


1 or 2 




DSORG= 


Ll 

DA or DAU 




DA 


DA 


DA 


DA 


DA 


HIARCHY= 


LL 

Oor 1 ^ 














KEYLEN= 


number ot bytes 












number of bytes 


LIMCT= 


LL 

number of tracks 
or blocks 






Ll 

number of tracks 
or blocks 






number of tracks 
or blocks 


OPTCD= 


[w] [e][f] 


H K 


[w] 


[w] 


[w][e] 






[wj 


RECFM= 


U,V,orF[T] Ll- 












U,V, or F[T] Ll 


This function can be specified in your program rather than in the DD statement. 
American National Standard COBOL. 
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Table 15. DCB Subparameters for Creating a Partitioned Data Set 



DCB 
Subparameter 



BFALN= 



BLKSIZE= 



BUFL= 



BUFNO= 



HIARCHY= 



KEYLEN= 



LRECL= 



NCP= 



OPTCD= 



RECFM= 



Assembler 



ForD 



number of bytes 



number of bytes 



\L 



number of buffers 



H 



Oor 1 



number of bytes 



number of bytes 



"n 



number of channel 
programs 



[w] QcJ 



TI 



u 


m 


a" 




M 




B 




V 


T 


A 




[_btJ 


M 




"b" 




F 


T 


A 




BT 


_M_ 



This function can be specified in your program rpther than in 
the DD statement. 



The format of the DCB parameter for copying the DCB parameter of a 
previous DD statement is: 



dsname 
| DCB=() *. ddname 



* - stepname . ddname 
I *. stepname .proc stepname .ddname ) 



[,list of attributes]) 



Replace "dsname" with the name of the cataloged data set whose 
attributes you want to copy. The volume that contains this data set 
must be mounted before the execution of the job step containing the copy 
request. A permanently resident volume is the most likely place from 
which to copy such information, in that it is always mounted. Unless 
you specify the volume sequence number and expiration date on the DD 
statement, these parameters are copied along with the DCB information. 

attributes of a cataloged data set named SYSl.SVCLIB: 

//NEWDD DD...,DCB=SYS1.SVCLIB 

Replace "ddname" with the name of the DD statement whose DCB parameter 
you want to copy. Replace "stepname" with the name of the EXEC 
statement of the step that contains that DD statement. If the DD 
statement you want to copy is contained in the same job step, omit the 
stepname, i.e.,, 

DCB=*. ddname 

i n 

//DD1 DD.. .,DCB=(BLKSIZE=1600,LRECL=80) 



//STEP 4 EXEC... 

//COPY DD. .. ,DCB=*.STEP2.DD1 
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The following example shows how to code the DCB parameter of a previous 
DD statement in the same step: 



//STEPD EXEC... 

//DDA DD. . . , DCB=RECFM=F 



//DDC DD... ,DCB=*.DDA 
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If you want to copy the DCB parameter of a DD statement contained in a 
cataloged procedure step, you must give both the name of the job step 
that invokes the procedure and the procedure step name, i.e., 

DCB=*.stepname.procstepname.ddname 

The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the ST5 EXEC statement 



j INPUT DECK 
h J 



//ST5 EXEC PROC=XYZ 



stepname 
//COPY EXEC... >N \^ 

//DD1 DD . . . , DCB= * 7ST5 . STEP U . DATA 

y& ddname 
procstepname 




H 



CATALOGED PROCEDURE 




//STEP 4 EXEC... 
//DATA"DD. . . , DCB=BUFN0=4 



If you want to modify the DCB subparameters you are copying add the new 
subparameters to the reference. The subparameters you specify will 
override the corresponding copied subparameters. For example. 



//OUT EXEC... 

//DASDA DD...,DCB=(BLKSIZE=160,LRECL=80) 

//DASDB DD . . . , DCB= ( * . PUNCH1 , BLKSIZE=16 00) 
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Special Processing Options 

There are three special processing options for data sets on direct 
access devices : 

1. You can request channel separation from other data sets in the same 
job step using either the SEP or the AFF parameter. 

2. You can suppress I/O operations on a sequential data set using the 
DUMMY parameter. 

3. For systems with MVT and TSO, you can defer the definition of a 
data set until you need it using the DYNAM parameter. 



SEP : When two or more data sets are to be used in a job step, 
processing time may be shortened by requesting that the system transmit 
data sets over separate channels. For example, it would be faster to 
have your input data set and your output data set on separate channels 
than to have them on the same channel. 

You can request channel separation for data sets in each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type on different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with the UNIT 
parameter. 
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The format of the SEP parameter is: 



j SEP=(ddname,...) 

L 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. The earlier DD statements can define 
any type of data set: new or existing, on magnetic tape or direct 
access, temporary or nontemporary, etc. 



In the following example, you request that the data set defined by 
the FOUR DD statement be assigned to a channel other than the channels 
assigned to the data sets defined by the ONE and TWO DD statements. The 
data sets defined by ONE and TWO may or may not be on the same channel. 
The data set defined by THREE may or may not be on the same channel as 



//PR0G1 EXEC PGM=PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL==(,NL) 
//TWO DD DSNAME=SYSTEM. USER. ABC, DISP=OLD 
//THREE DD DSNAME=HELP,DISP= (,KEEP) ,UNIT=2314 , 
// V0LUME=SER=AFL,LABEL=RETPD=31 

//FOUR DD DSNAME=END,DISP=OLD,UNIT=2400-2, 
,// VOLUME=SER=TAPE7 5,SEP=(ONE,TWO) 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 
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//PR0G1 EXEC PGM=PROCESS 

//ONE DD UNIT= 24 00,VOLUME= PRIVATE, LABEL=(,NL) 

//TWO DD DSNAME=SYSTEM. USER. ABC ,DISP=OLD 

//THREE DD DSNAME=HELP, DISP= ( ,KEEP) , UNIT=2314, 

// VOLUME=SER=AFL, LABEL=RETPD=31 , SEP=TWO 

//FOUR DD DSNAME=END,DISP=OLD # UNIT=2400-2, 

// VOLUME=SER=TAPE75,SEP=(ONE,TWO) 



As a result of this example, the data sets defined by ONE and TWO may or 
may not be on the same channel. The data set defined by THREE and FOUR 
may or may not be on the same channel, but neither one will be on the 
same channel as the data set defined by TWO. Also, the data set defined 
by FOUR will not be on the same channel assigned by ONE. 



Remember that the request for channel separation made with the SEP 
parameter is only a suggestion to the system for more efficient 
operation, and not a requirement. If your data sets must be on separate 
channels specify unit addresses with the UNIT parameter. You can obtain 
a configuration chart with all the unit addresses from your manager or 
supervisor . 



AFF : The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same separation using the AFF 
parameter in the later data sets. The AFF parameter tells the system 
that you want the data set defined on this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 



The format of the AFF parameter is: 



| AFF=ddname 

L 



Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separation. This data set and the earlier data set 
may or may not be on the same channel. 



In the following example, the data sets defined by DD1 and DD2 may or 
may not be on the same channel. The data sets defined by DD3 and DD5 
may or may not be on the same channel, but neither one will be on the 
same channel as the data sets defined by DD1 and DD2. The data set 
defined by DD4 will not be on the same channel as the data set defined 
by DD3, but it may be on the same channel as the data sets defined by 



| //STEP 


EXEC 


PGM=NINE 


j //DD1 


DD 


j|||j^l|i|||JIIBl|^^lilll 


| //DD2 


DD 


fp^^ii^jiipMyiiipp^p^i^Ppp 


j //DD3 


DD 


SEP=(DD1,DD2), 


| //DD4 


DD 


SEP=DD3, ... 


| //DD5 


DD 


AFF=DD3,... 



The requests for channel separation and affinity are only suggestions to 
the system. They will be honored if the appropriate devices are 
available. 



< 



172 JCL User's Guide (Release 20.1) 



DUMMY ; The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing programs ask to write the dummy 
data set, the write request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
writing of a data set until you are sure your program is going to 
produce meaningful output. The DUMMY parameter is a positional 
parameter. That means that it must be coded first in the operand field. 
For example: 

//OUTPUT DD DUMMY , UNIT=23 11 , V0LUME=SER=AAA9 9 9 , SPACE= ( TRK ,(20,1)) 
//DASD2 DD DUMMY,DSNAME=A.B.C.,DISP=(CATLG),UNIT=2301, 
// VOLUME- ( PRIVATE, RETAIN), SPACE=( 2000, (500,, 20), 
// DCB=(BUFNO=2,BLKSIZE=2500,LRECL=50) 

If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 
above could be coded as follows: 

//OUTPUT DD DUMMY 

//DASD2 DD DUMMY,DCB=(BUFNO=2,BLKSIZE=2500,LRECL=50) 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to write tne 
data set. For example: 

//OUTPUT DD UNIT=2311,VOLUME=SER=AAA999,SPACE=(TRK, (20,1)) 

//DASD2 DD DSNAME=A.B.C,DISP=(CATLG),UNIT=2301, 

// VOLUME=( PRIVATE, RETAIN) ,SPACE= (2000, (500,, 20)), 




C 

c 



Creating 



Direct Access 
Devices 



DYNAM: 



In TSO (Time Sharing Option) LOGON procedures, the DYNAM 



parameter allows you to defer definition of data sets until you need 

them. The DYNAM parameter reserves space in internal tables so that 

data set requirements that arise during a terminal session may be 

satisfied. When you require a data set, the actual device and external 
storage for the data set can then be allocated. When DYNAM is used in 

the background (batch environment), it has the same effect as coding 
DUMMY. Like DUMMY, DYNAM is a positional parameter. However, no other 
parameters may £>e coded with the DYNAM parameter. 

//INPUT DD DYNAM 
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NOTES 



The DD Statement 175 



Table 16. Parameters for Retrieving a Data Set 



Data Set 


Parameter Type 


Parameter 


Comments 


Unit 

Record 

Devices 


Location of the data set 


UNIT 


Required 


Data attributes 


DCB 


Optional 


Special Processing Option 


DUMMY 


Optional 


Input 
Stream 


Location of the data set 


* 


You must specify one of these parameters 


DATA 


Data attributes 


DCB 


Optional 


Passed 
Data Set 


Data set information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Required only if you want more units 


LABEL 


Required only if the data set does not have IBM standard labels 


Data attributes 


DCB 


Optional 


Special Processing Option 


DUMMY 


Optional 


Cataloged 
Data Set 


Data Set Information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Optional 


VOLUME 


May be required if you want to begin processing with a volume 
after the first 


LABEL 


Required only if the data set does not have IBM standard labels 


Data attributes 


DCB 


Optional 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


DYNAM 


Optional. Meaningful only for systems with MVT and TSO 


Kept 
Data Set 


Data set information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Required 


VOLUME 


Required 


LABEL 


Required only if the data set does not have IBM standard labels 


Data attributes 


DCB 


Optional 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


DYNAM 


Optional. Meaningful only for systems with MVT and TSO 
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Retrieving an Existing Data Set 

You can retrieve an existing data set located in unit record devices 
(card reader and paper tape reader), the input stream, magnetic tape, or 
direct access devices. Data sets on magnetic tape and direct access 
devices are retrieved in similar ways depending on whether they were 
passed, cataloged or kept when you created them. 

This chapter describes how to retrieve : 

• Unit record data sets (card reader and paper tape reader) . 

• Input stream data sets. 

• Passed data sets. 

• Cataloged data sets. 

• Kept data sets. 

Table 16 shows the parameters required to retrieve a data set. Please 
fold out Table 16 while reading this chapter. 



UNIT RECORD DEVICES 

You can retrieve an input data set on either a card reader or a paper 
tape reader. As shown in Table 16, only the UNIT parameter is required 
to indicate the device you want for the data set. The DSNAME and DISP 
parameters are not used, because data sets on unit record devices are 
always temporary and cannot be retrieved by another DD statement in your 
job. 

This section is summarized in Table 68 of Appendix D. 




C 
C 



Retrieving 



Unit Recon 
Devices 



Location of the Data Set 

The location of the data set is given by the UNIT parameter. 



UNIT ; The format of the UNIT parameter is: 



| {unit address) 
| UNIT=] device type [ 
I (group name ) 



where : 

unit address 

is the actual machine address of the device. For example, 
UNIT=00D. You should not specify the address unless you are sure 
you want that specific device. 

device type 

corresponds to the model number of the I/O device. Coding a device 
type provides you with a certain degree of device independence in 
that your data set may be placed in any of a number of devices of 
the same type. For example, if you code 
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your data set can be placed by the operator in any 1442 Card Reader 
in the system. The following device types can be specified: 

Device Type Description 

1442 1442 Card Read Punch 

2520 2520 Card Read Punch 

2540 2540 Card Read Punch (Read feed) 

2671 2671 Paper Tape Reader 

group name 

is the name of a collection of devices, selected by your 
installation during system generation. For example, your 
installation might select the name CARD for all card readers in the 
configuration. If you do not care which card reader is used for 
your data set, you would then code 

Your manager or supervisor should tell you which group names were 
generated for your installation. 



Data Attributes 

The DCB parameter allows you to specify attributes for your data set 
when your program is to be executed rather than when it is compiled. 
Any applicable attributes not specified in your program must be 
specified with the DCB parameter. However, in most cases, your compiler 
will provide a default value for an attribute if you do not specify it 
in the program or in the DD statement. Other attributes are always 
given a fixed value by the compiler and you do not have to specify them 
at all. For example, you can select a buffering technique with the 
assembler, but all other IBM compilers select one for your use when it 
is needed. 



DCB ; You can use the DCB parameter to directly specify the DCB 
attributes of your data set or to copy those DCB attributes specified in 
a DD statement for another data set. The format of the DCB parameter 
for specifying the attributes is: 

i ■ 1 

| DCB=(list of attributes) | 

L^ . J 

The attributes in the list are coded in the form of keyword 
subparameters separated by commas; for example, 

DCB=(BLKSIZE=300,LRECL=100) 
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'^"^"•""-it-^J-o J-vyJ- »— cu.\_i x\.*rcivac:i 



D 

CO 
ft 

ft 






DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


ANS COBOL "— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




l!£ 

For D 














BFTEK= 




SorE "— 
(QSAM only) 














BLKSIZE= 


number of bytes 


[l 
number of bytes 




Ll 

number of bytes 


Ll 

number of bytes 


number of bytes 


number of bytes 


Ll 

number of bytes 


BUFL= 




L 1 

number of bytes — 














BUFNO= 




number of buffers 


Ll 

number of buffers 


number of buffers 


number of buffers 


1 or 2 


1 or 2 


Ll 

number of buffers 


EROPT= 




|_1 
ABE l — 


ABE 


ABE 


ABE 








HI ARCH Y= 




h 

Oor 1 •— 














LRECL= 


number of bytes 


number of bytes 








number of bytes 


number of bytes 


Ll 

number of bytes 


MODE= 




Cor E '- ! - 


CorE 


CorE 


CorE 


CorE 


Cor E 


c e Ll 

C or E 


NCP= 




ll 
number of channel 

programs 

(BSAM only) 












Ll 

number of channel 
programs 
(BSAM only) 


OPTCD= 




fc] Ll 


Cc] 


[c] 


[c] 


[c] 


[c] 


[c] 


RECFM= 


£[B][A] 


U 
V 
F 


a" 

_M_ 

"b~ 

S 
_BS_ 

"b~ 

S 
BS 


or 
|_M_ 

L M . 


Ll 

or 








U[A] or 


U|~A~ 
[_M 

F[B] 


or 

_m] 


U 

V 

F 


fAl 

_mJ 
"b~ 

S 
_BS_ 

"b" 

S 
BS 


or 

M 

|_M 

"a" 

M 


Ll 

or 


STACK= 




1 or 2 


lor 2 


lor 2 


I or 2 


I or 2 


I or 2 


I or 2 


This function can be specified in your program rather than in the DD statement. 

2 

For QSAM, you must specify both BFALN and BFTEK on the DD statement, or omit both. 

American National Standard COBOL. 




00 
O 



8 



H 

0) 
W 
<D 

o 



Table 18. DCB Subparameters for Paper Tape Reader 



DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


13 

ANS COBOL ' — 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




[Li 
For D 














BFTEK= 




Sor E ' — 
(QSAM oniy) 














BLKSIZE= 


number of bytes 


(l 
number of bytes 




h 

number of bytes 


Lu 

number of bytes^ — 


number of bytes 


number of bytes 


li 
number of bytes 


BUFL= 




ll 
number of bytes ' — 














BUFNO= 




h 
number of buffers ' — 


Ll 

number of buffers 


number of buffers 


number of buffers 


1 or 2 


1 or 2 


Ll 

number of buffers 


CODE= 




LL 

I,F,B,C,A,T, or N ' — 












Ll 

l,F,B,C,A,TorN 


EROPT= 




h 
ABE 1 — 


ABE 


ABE 


ABE 








HIARCHY= 




li 
Oor 1 "— 














LRECL= 


number of bytes 


number of bytes — 








number of bytes 


number of bytes 


ll 
number of bytes — 


NCP= 




ll 
number of channel 
programs (BSAM only) 














OPTCD= 




[c] ^ 


[c] 


[c] 


[c] 


[c] 


[c] 


[c] 


RECFM= 


E[B][A] 


y 

F 


[m] 

B 
S 
_BS_ 

"b" 

S 
BS 


or 

"a" 

_M_ 

M 

|_M 


Ll 

or 








V[B] 
F[B] 


or 

M 

a" 

M 


or 


u 

v 

F 


A 
M 

H 

[b] 


or 

a" 

M_ 


-■ 


U or F 


This function can be specified in your program rather than in the DD statement. 

For QSAM, you must specify both BFALN and BFTEK on the DD statement, or omit both. 

American National Standard COBOL. 



The valid subparameters that can be used with each compiler for the card 
reader and paper tape reader are shown in Tables 17 and 18 , 
respectively. Underscored items are those default values selected if 
you omit the subparameter . Default values are not shown where the 
attribute can either be specified in your program, or in the DD 
statement. If values for a given subparameter are not shown, it is 
either specified in your source program or given a fixed value by the 
compiler. A glossary of DCB subparameters is given in Appendix B. Code 
only those parameters that apply to your compiler as shown in Tables 17 
and 18. The format of the DCB parameter for copying the DCB parameter 
of a previous DD statement in your job is: 



*.ddname 
DCB= ( \ *. stepname. ddname 

* . stepname .procs tepname . ddname 



[,list of attributes]) 



Replace "ddname" with the name of the DD statement whose DCB parameter 
you want to copy. Replace "stepname" with the name of the EXEC 
statement of the step that contains that DD statement. If the DD 
statement you want to copy is contained in the same job step, omit the 
stepname, i.e., 

DCB=*. ddname 

The following example shows how to code the DCB parameter tc copy the 
DCB parameter of a DD statement in a previous step: 




C 
C 



Retrieving 



Unit Recor< 
Devices 



//STEP2 EXEC. . . 

//DD1 DD.. . ,DCB=(BLKSIZE=1600,LRECL=80) 



V/STEP4 EXEC... 
//READ DD. .. ,DCB=*.STEP2.DD1 



The following example shows how to code the DCB parameter of a previous 



//STEPD EXEC . . . 

//DDA DD. . . ,DCB=RECm=F 



//DDC DD. . . , DCB= * . DDA 



If you want to copy the DCB parameter of a DD statement contained in a 
cataloged procedure step, you must give both the name of the job step 
that invokes the procedure and the procedure step name, i.e., 

DCB=*. stepname. procstepname. ddname 
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The first part of the following example shows your input deck; the 
second part shows a cataloged procedure called by the SIX EXEC statement 



INPUT DECK 



//SIX EXEC PROC=XYZ 



stepname 
//COPY EXEC. . 

//DD1 DD. . . ,DCB=*. SIX. STEP 4. PAPER 

ddname 
procstepname 



CATALOGED PROCEDURE 



//STEP 4 EXEC . . . 

//PAPER DD... ,DCB=CODE=I 



If you want to modify the DCB subparameters you are copying add the new 
subparameters to the reference. The subparameters you specify will 
override the corresponding copied subparameters. For example: 



//READ1 DD. . . ,DCB= <BLKSIZE=160 f LRECL=80, OPTCD=C,MODE=E, RECFM=F) 
| //READ 2 DD...,DCB=(*.READ1,M0DE=C,STACK=2) 



Special Processing Option 

You can use the DUMMY parameter to bypass I/O operations on your data 
set. 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing program asks to read the dummy 
data set, the read request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
reading of a data set until you are sure your program is going to 
process it correctly. 
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The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

//R20 DD DUMMY,UNIT=1442 

If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 
above could be coded as follows : 

//INPUT DD DUMMY,DCB=CODE=I 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve 
the data set. For example, 

//R20 DD UNIT=1442 




C 



Retrieving 



Input Stream 

INPUT STREAM 

You can place your input data set in the input stream following the 
other JCL statements in the job step. If the EXEC statement for the job 
step requests a program, you can include the input data for that program 
in the input stream. If the EXEC statement requests a cataloged 
procedure, you can include the data for each procedure step in the input 
stream. 

The data must be preceded by a DD statement and followed by a 
delimited (/*) statement. As shown in Table 16, the DD statement must 
contain an * or DATA in the operand field. The * parameter means that 
data follows. The DATA parameter must be used if the data contains JCL 
statements . 

This section is summarized in Table 69 of Appendix D. 

I The following considerations apply to data in the input stream: 

Input Stream Data : 

1. The input stream must be on a card reader, magnetic tape or direct 
access device. (The device must be supported by QSAM. ) 

2. You can include more than one input stream data set for each job 
step or procedure step. 

3. If the data set contains JCL statements you must precede it with a 
DD DATA statement and follow it with a delimiter statement. 

4. If the data set does not contain JCL statements, you can either 
precede it with a DD* statement or follow it with a /* statement, 
or both. If you omit the DD* statement the system provides one. 
Although it is not necessary, it is good practice to both precede 
the data with a DD* statement and to follow it with a /* statement. 

5. The characters in the records must be coded in BCD, EBCDIC or 
ASCII. 

6. You may code the DCB subparameters BLKSIZE and BUFNO in the DD 
statement. (See "Data Attributes.") 

The DD Statement 18 3 



Location of the Data Set 



To indicate that the data set follows in the input stream, you must code 
the * or the DATA parameter. 



THE ♦ PARAMETER ; To specify that data follows in the input stream, code 
an asterisk (*) in the operand field. For example: 

The data must not contain JCL statements. 

The following example shows a two step job named ELLEN. STEP1 contains 



//ELLEN JOB 

//STEP1 EXEC PGM=ONE 



//INPUT DD * 

data records 

//READ DD * 

data records 

//STEP2 EXEC PGM=TWO 



//SYSIN DD * 

data records 



In the following example, the EXEC statement requests a cataloged 
procedure named TOP. TOP has three procedure steps named AA, BB, and 
CC. You are including two data sets in the input stream for procedure 
step AA, three for BB, and one for CC. In addition, you are including a 
DD statement named WORK for procedure step BB. 



//BB.WORK DD UNIT=2311, VOLUME=PRIVATE,SPACE=(TRK, (200) ) 

t. „ , „» _. w ,.... l ,; ^^^^^^^^-^^^^ < ^.-*.»^ -,-.-«—.«-»—;*, . _J 



( 
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Note ; For information on how to modify cataloged procedures, refer to 
"Part IV: Cataloged and In- stream Procedures." 



DATA : To specify that data follows in the input stream, code DATA in 
the operand field. For example: 

The data can contain any JCL statements except the delimiter (/*) 
statement, because the delimiter statement marks the end of the input 
data set. 

For example, the following DD statement indicates that the data 
records that follow contain JCL statements. 



//IN DD DATA 

data records 



statements . 




C 




Retrieving 



Input Strean 



//STEPZ EXEC PROC=ROSE 

//PINK. BLANK DD UNIT=2400,LABEL= ( , BLP) 

//PINK. IN DD DATA 

data records 

|^3llf PSiilf pillff § isiSIIl ,k; liSitlfi i f Slfi/ifi i b 

//PINK. IN2 DD * 

data records 

//TEA. INTAKE DD * 

data records 

//TEA. GULP DD DATA 

data records 



Data Attributes 

Input stream data sets are written by the system onto direct access 
devices so that the data can be retrieved rapidly when required by the 
processing program. As the data is written onto the direct access 
device the data is blocked. The block size and number of buffers used 
for blocking the data are default values selected by your installation. 
Your manager or supervisor can tell you what those values are. If you 
want to specify shorter blocks or less buffers you can do so with the 
BLKSIZE and BUFNO subparameters of the DCB parameter. You cannot 
request larger blocks or more buffers. 



The DD Statement 18 5 



DCB : Only the BLKSIZE and BUFNO sub para meters can be coded in a DD* or 
DD DATA statement. You must find out what your installation's default 
values are and then you can specify smaller values, if applicable to 
your data set. 

For example, assume that your installation's default values are 
BLKSIZE=2400 and BUFN0=4 . If you want to specify a block size of 1600 
for your data set, code 

//SYSIN DD DATA,DCB=BLKSIZE=1600 
If you want to specify two buffers for your data set, code: 

If you want to specify a blocksize of 1200 and three buffers, code: 
//INPUT DD *,DCB=(BUFNO=3,BLKSIZE=1200) 

PASSED DATA SET 

A passed data set is one you defined with the DISP=(,PASS) parameter. 
The most common type of passed data set is a " temporary- for the duration 
of the job" data set, although you can also have nontemporary passed 
data sets. 

A passed data set can only be retrieved in the same job it was 
created. However, if you have a nontemporary passed data set, you can 
change its disposition to KEEP or CATLG when you retrieve it so that it 
can be retrieved in other jobs. 

The parameters shown in Table 16 are used to retrieve passed data 
sets. 

This section is summarized in Table 70 of Appendix D. 



Data Set Information 

The DSNAME and DISP parameters are required. DSNAME identifies the data 
set. DISP specifies if you are retrieving or extending the data set. 



DSNAME : You can identify the passed data set in one of two ways: 

1. Giving its name exactly as it appeared in the DD statement where 
you defined it, or 

2. Making a backward reference to the DD statement that defined the 
data set. 

Both ways are equally valid, but the second is more useful because if 
you decide to change the data set's name you only have to change it in 
the original DD statement. 
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( 



The format of the DSNAME parameter for identifying the passed data 
set (or member of a partitioned data set) by name is: 



i— 



'dsname 

, dsname (membername) i 
DSNAME=)&&name 

& & name ( memb e rname ) ( 
£ name 

Sname ( member name ) 
j 



Code the DSNAME parameter exactly as you coded it in the original 
DD statement. For example, if you coded 

DSNAME=&&AREA 

you must again code 

DSNAME=S&AREA 



The format of the DSNAME parameter for identifying the passed data 
set with a backward reference is: 




C 
C 



Retrieving 



Passed 
Data Set 



r 



DSNAME= 



* . ddname 

* . stepname . ddname , 

* . stepname . procs tepname . ddname 



Replace "ddname" with the name of the DD statement, where the 
passed data set is defined. Replace "stepname" with the name of 
the EXEC statement of the step that has the earlier DD statement. 
If the earlier DD statement is contained in the same step, omit the 
stepname, i.e., 

DSNAME=*. ddname 

When the earlier DD statement is contained in a cataloged procedure 
step, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e., 

DSNAME=*. stepname. procstepname. ddname 

The following example shows how to code the DSNAME parameter to 
identify a member of a passed data set defined in a previous step. 



//STEP2 EXEC... 

//TEMP DD DSNAME =&&ALPHA (FIRST) ,DISP= ( , PASS),.. . 



//STEP 4 EXEC... 

//USE DD DSNAME=*.STEP2.TEMP, .. 



The following example shows how to code the DSNAME parameter to 
identify a passed data set defined in a cataloged procedure step. 

part shows a cataloged procedure called by the STEP3 EXEC statement 
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INPUT DECK 



V/STEP3 EXEC PROC=PROC7 

stepname 

//STEP 5 EXEC 

//DDA DD DSNAME=*.STEP3. NOVA. FILE 

ddname 



CATALOGED PROCEDURE 



proc stepname 



//NOVA EXEC PGM=N 

//FILE DD DSNAME=LEFT,DISP=(,PASS) ,\ 



DISP : You can code the DISP parameter in one of two ways depending on 
whether other steps in the job will also use the data set or whether 
this is the last time you are using the data set. 

1. The format of the DISP parameter for passing the data set to a 
subsequent job step is : 



DISP= (OLD, PASS |~, DELETE"] ) 
CATLG 
KEEP J 



I: 



You must code OLD. For nontemporary data sets, coding OLD 
guarantees exclusive control of the data set name specified in the 
DSNAME parameter for the data set. Exclusive control of the data 
set name means that no other job that requests the data set can be 
processed until the job with exclusive control terminates. This 
also means that the data set name itself is being exclusively 
controlled. If a request is made for the same data set name, the 
request will not be processed — even though the request may refer 
to an entirely different physical data set. The PASS subparameter 
indicates that the data set can be used by later steps in the job. 
The third subparameter tells the system what to do with the data 
set if the step terminates abnormally. You can specify DELETE for 
both temporary and nontemporary data sets; you can specify KEEP or 
CATLG only if the data set is nontemporary. If you omit the third 
subparameter, the system uses the disposition specified as the 
second subparameter to determine what to do with the data set. In 
this case, the data set will be passed. 

Note ; When you are retrieving members of a partitioned data set, 
the disposition (PASS,, DELETE, CATLG, KEEP) you specify applies to 
the entire data set and not to the one member. If you want to 
delete a particular member of a nontemporary partitioned data set 
you must use the IEHPROGM utility program. The entire temporary 
partitioned data set is deleted at the end of the job. 
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2. The format of the DISP parameter for the last time you use a passed 
temporary data set in a job is: 



| DISP=(0LD , DELETE, DELETE ) 

L 



You must code OLD. A passed temporary data set will always be 
deleted at the end of the job so you do not have to code the DELETE 
subparameter. 

The format of the DISP parameter for the last time you use a passed 
nontemporary data set in a job is: 



DISP= (OLD 



' .KEEP ' 
, DELETE 
. CATLG 



E 



KEEP "I 
DELETE ) 
CATLG J 




You must code OLD. Coding OLD Guarantees exclusive control of the 
data set name specified in the DSNAME parameter for the data set. 
Exclusive control of the data set name means that no other job that 
requests the data set can be processed until the job with exclusive 
control terminates. This also means that the data set name itself 
is being exclusively controlled. If a request is made for the same 
data set name, the request will not be processed — even though the 
request may refer to an entirely different physical data set. At 
the end of the step, the data set will also be kept unless you 
specify DELETE or CATLG. If the step ABENDS, the data set will 
also be kept unless you specify DELETE or CATLG. 

In the following example., two data sets named ££DATA(MEM1) and LIST 
are defined in the first step of a job. In the second step, 
SfeDATA(MEMl) is retrieved and passed again. In the third step, LIST is 
retrieved and passed again. In the fourth step, 6€DATA(MEM1) is 
retrieved and all of S6DATA is deleted, and LIST is retrieved and 
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//MYJOB JOB 

//STEPl EXEC PGM=UNO 

//DSl DD DSNAME=£SDATA(MEM1) ,DISP= (,PASS) ,UNIT=2311, 

// VOLUME= PRIVATE, SPACE=(TRK, (25, ,3)) 

//DS2 DD DSNAME=LIST,DISP=(,PASS),UNIT=2400 



//STEP2 EXEC PGM=DOS 
Y/DS3 DD DSNAM©=*. STEPl. DSl, DISP= (OLD, PASS) 



//STEP3 EXEC PGM=TRES 

//DSa DD DSNAME= LIST, DISP=( OLD, PASS) 



//STEP 4 EXEC PGM^CUATRO 

//DS5 DD DSNAME=*. STEPl. DS1,DISP=0LD *y\ 

| //DS6 DD DSNAME**. STEPl. DS2,DISP= (OLD, CATLG) 

I i 
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Location of the Data Set 

The system obtains unit and volume information from the original DD 
statement. The UNIT and LABEL parameters are only needed in the 
following cases: 

1. The UNIT parameter is used if you want more devices allocated to 
the data set than were requested the last time the data set was 
passed. 

2. The LABEL parameter is used if the data set does not have standard 
labels . 



UNIT : The UNIT parameter should be used only if the passed data set is 
a multivolume data set. The system assigns the same number of devices 
to the data set as it did in a previous step. If you want more devices 
assigned to the data set, code in the unit count subparameter the total 
number of devices needed. 

The format of the UNIT parameter for passed data sets is: 



| UNIT=(,unit count) 

L 



Replace "unit count" with the number of devices needed for the data set. 
Remember that you should not request more devices than there are 
volumes. 

In the following example a data set named S6JUNK is defined in the 
first step. A maximum of five volumes are required for ££JUNK and they 
are to be mounted in succession on two units. In the second step, you 
retrieve SSJUNK, but request that four units be used. 



//SAM JOB 

//DATA DD DSNAME=&S JUNK, DISP=(, PASS), UNIT=( 2314, 2) 
// VOLUME^ (PRIVATE,,, 5) ,SPACE=(CYL, (20,15)) 



//STEPB EXEC PGM=Y 

//GET DD DSNAME=*.STEPA. DATA, DISP=(OLD, PASS), UNIT=(,4) 



LABEL : The LABEL parameter is used only if the passed data set does not 
have IBM standard labels. You must code the same label type you 
specified when you defined the data set. No other subparameter s are 
allowed. The format of the LABEL parameter for passed data sets is: 
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Code: 
SUL 

AL 

AUL 



if the data set has IBM standard and user labels. 



if the data set has American National Standard labels. 



if the data set has both American National Standard labels and 
American National Standard user labels. 



NL 



NSL 



BLP 



if the data set has no labels. 



if the data set has nonstandard labels. 



to bypass label processing. 




In the following example, a data set named BANK is defined in the 
first step. BANK has nonstandard labels. BANK is retrieved and passed 
in the second step. 
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r . . ^ 

//ST EPA EXEC PGM=ZYZ 

//DDAA DD DSNAME=BANK,DISP= ( ,PASS) ,UNIT=2400,LABEL= ( ,NSL) 



//STEPB EXEC PGM=WZW 

//DDAB DD DSNAME=*. STEP A. DDAA, DISP=( OLD, PASS) ,LABEL=(, NSL) 



Data Attributes 

The DCB parameter is used only if the data set does not have standard 
labels and the DD statemer*. that defined the passed data set contains 
the DCB parameter. 



DCB : You must specify the DCB parameter in one of two ways: 

1. Copy the DCB parameter exactly as it appeared in the DD statement 
where you defined the passed data set, or 

2. Make a backward reference to the DD statement that defined the data 
set. 

Making a backward reference reduces the possibility of error in copying 
the parameter. 

The format of the DCB parameter for copying the attributes of the 
passed data set is: 



| DCB=(list of attributes) 

L 
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Code exactly the same DCB subparameters you coded in the DD statement 
where the passed data set is defined. You may not add, change, or 
delete subparameters. For example, if you coded 

DCB= (BLKSIZE=800,LRECL=80) 



DCB=(BLKSIZE=800,LRECL=80) 
The format of the DCB parameter for making a backward reference is: 



r 1 

| (*. ddname i | 

| DCB=( j*. stepname. ddname U,list of attributes]) | 

j '*. stepname. procstepname. ddname) | 

L J 



Replace "ddname" with the name of the DD statement whose DCB parameter 
you want to copy. Replace "stepname" with the name of the EXEC 
statement of the step that contains that DD statement. If the DD 
statement you want to copy is contained in the same job step, omit the 
stepname , i.e., 

DCB=*. ddname 

If you want to copy the DCB parameter of a DD statement contained in a 
cataloged procedure step, you must give both the name of the job step 
that invokes the procedure and the procedure step, i.e., 

DCB=* .stepname. procstepname . ddname 
The following example shows how to code the DCB parameter to copy the 



r . 

//STEP2 EXEC. . . 

//DD1 DD...DISP=(, PASS), LABEL- ( # NL) ,DCB*=BLKSIZE=1600 



//COPY DD. . .DISP=* (OLD, PASS) ,LABEL= (, NL) ,DCB~*. STEP2.DD1 



L J 



The following example shows how to code the DCB parameter to copy the 
attributes of a passed data set defined in a cataloged procedure step. 
The first part of the example shows your input deck., the second part 
shows a cataloged procedure called by the TWO EXEC statement in your 
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j INPUT DECK 
1 



//TWO EXEC PROC=XYZ 



"stepnairiP_ 
//COPY EXEC . . . 
//DD1 DD, . .DISP= (OLD, PASS) , LABEL- ( f BLP) ,DCB=*~.TWC%STEP4.DATA 

ddname V^ 



CATALOGED PROCEDURE 




//STEP U EXEC rr 

//DATA~"DD. . . DISP= ( , PASS ) , LABEL= ( , BLP) , DCB=BUFNO=4 




C 
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Special Processing Option 

You can use the DUMMY parameter to bypass operations and data set 
disposition on a sequential data set (magnetic tape or direct access). 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing programs ask to read the dummy 
data sets, the read request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
reading of a data set until you are sure your program is going to 
process it correctly. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 



//INPUT DD DUMMY, DSNAME=* . STEPl. DDA,DISP= (OLD, PASS ), LABEL= (, NL) , 

//READ DD DUMMY, DSNAME -*.STEP4. ABC, DISP= ( OLD, PASS) 

If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 

//INPUT DD DUMMY,DCB=BLKSIZE=500 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve 

//READ DD DSNAME=*.STEP4. ABC, DISP=(OLD, PASS) 
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CATALOGED DATA SET 

A cataloged data set is a nontemporary data set defined with the 
DISP= (,CATLG) parameter or cataloged by the IEHPROGM utility program. 
The parameters shown in Table 16 are used to retrieve a cataloged data 
set. 

This section is summarized in Table 71 of Appendix D. 



Data Set Information 

The DSNAME and DISP parameters are required. 



DSNAME : The format of the DSNAME parameter is: 



idsname j 

dsname (member name ) [ 
groupname( number) ) | 



.j 



Replace the term "dsname" with name of the cataloged data set. If the 
name is a fully qualified name you must give all levels of 
qualification. For example, if you created the data set as 

DSNAME=SYST . GLOBE 

If you are retrieving a member of a partitioned data set, you must 
code the member name in parentheses after the data set name. For 

DS NAME=ORB ( MOON ) 

DSNAME=S YST . GLOBE ( SUN ) 

If you are retrieving a member of a generation data group you must 
use the form 

DSNAME=groupname (number) 

Replace "groupname" with the name of the generation data group. Replace 
"number" with the number of the generation you are retrieving. Remember 
that the most recent generation is 0, the previous generation is -1, and 
so on. For example, if you want to retrieve the most recent generation 

DSNAME=ABC . FILE ( ) 
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( 



DISP : The format of the DISP parameter is 



I /OLD) 
| DISP=((SHRJ 



", UNCATLG - ] |\ UNCATLG] 
, DELETE , DE LETE I ) 



You must code either OLD or SHR. OLD indicates that you are retrieving 
the data set and requesting exclusive control of it- In order to modify 
a data set, you must have exclusive control of the data set. SHR 
indicates that jobs that are executing concurrently with this job step 
may simultaneously use the data set. When SHR is specified, any job 
that uses the data set should only read the data set. Once you specify 
SHR for a data set, every reference to that data set within the job must 
specify SHR or the data set can no longer be used by concurrently 
executing jobs. 



Note : Caution should be observed when specifying SHR for IBM processor 
data sets since no provision is made for acquiring exclusive control of 
the data sets prior to writing (e.g., SYSGO for the Assembler). For 
more information on sharing a data set and on gaining exclusive control 
of a data set when you have specified SHR, refer to the Data Management 
Services publication. 
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The second positional parameter tells the system what is to be done 
with the data set at the end of the job step. If you omit this 
subparameter, the data set remains cataloged. If you code UNCATLG the 
data set will be uncataloged but not deleted. (The next time you 
retrieve an uncataloged data set you must follow the directions given 
for "Kept Data Sets.") If you code DELETE the data set will be deleted 
(and uncataloged). 

The third positional subparameter tells the system what is to be done 
with the data set if the step ABENDS. You can specify UNCATLG or 
DELETE. 

Note : When you are retrieving a member of a partitioned data set, the 
disposition (UNCATLG, or DELETE), you specify applies to the entire data 
set and not to the one member. If you want to delete a particular 
member, you must use the IEHPROGM utility program. 

In the following example, you are retrieving a cataloged data set 

In the following example you are retrieving a member of a cataloged 
data set named SYS1.F0RTLIB. Other jobs can also retrieve SYSl.FORTLIB 



named AREA. After using it you want to uncatalog the data set. 
//DDZ DD DSNAME=AREA.DISP= (OLD. UNCATLG) 
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Location of the Data Set 

The system obtains unit and volume information from the catalog. The 
UNIT, VOLUME and LABEL parameters are only needed in the following 
cas es : 

1. If you want more than one unit assigned to your data set, use the 

UNIT parameter. 

2. If you want to defer mounting of the volumes, use the UNIT 
parameter. 

3. If you want your data set assigned to the same devices assigned to 
a data set defined earlier in the job step, request unit affinity 
with the UNIT parameter. 

4. If you want the volume to be private, use the VOLUME parameter. 

5. If the cataloged data set does not have standard labels you must 
use the LABEL parameter to specify the LABEL type. 

6. If your data set has the same name as the data set specified on the 
JOBLIB DD statement, use the UNIT and VOLUME parameters. 

UNIT ; The UNIT parameter should be used only if you want to request 
more than one unit for your data set or if you want unit affinity. 

Requesting Units : The system assigns one device to your data set. If 
you need more devices use the unit count subparameter or the P 
subparameter . 



I UNIT= (, [unit count] [ , DEFER] ) 

! b J 



unit count 

indicates how many units you want assigned to the data set. You 
can specify a maximum of 59 units per DD statement. Make sure that 
your system has at least the number of units you specify. 
Otherwise an error will result. If you specify fewer units than 
the number of volumes in your data set, only the same number of 
volumes as there are units can be mounted at the same time. (If 
you request less units than volumes code the PRIVATE subparameter 
in the VOLUME parameter. ) If you specify the same number of units 
as there are volumes, all volumes can be mounted at the same time. 

P 

specifies parallel mounting. When you request parallel mounting 
the system assigns to the data set as many units as there are 
serial numbers in the catalog entry. 

DEFER requests the system to assign the required tape drives or 
direct access devices to the data set and to defer the mounting of the 
volume or volumes until the processing program attempts to open the data 
set. Operating efficiency may decrease if you specify DEFER for a tape 
data set. If DEFER is coded for a tape data set, the system issues a 
mount message to the operator when the processing program attempts to 
use the data set and then waits until the volume is mounted. If you do 
not code DEFER, the mount message is issued when the device is assigned 
and there is no waiting for the operator. By the time your program 
tries to use the data set, it is very likely that the operator has 
already mounted the volume and that the system will not have to wait for 
him. 
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Unit Affinity : To conserve the number of units used in a job step, you 
can request that the cataloged data set be assigned to the same device 
or devices as assigned to an earlier data set in the same step. This 
technique, known as unit affinity, indicates that you want the volumes 
on which the cataloged data set resides and the volumes used by the 
earlier data set to be mounted on the same devices in sequential order. 
Unit affinity implies deferred mounting for one of the volumes since 
both volumes cannot be mounted at the same time. 



Before you request unit affinity, make sure that both data sets use 
the same type of removable volumes ; for example, both data sets could be 
on 2314 volumes, or both on 2400 volumes. It does not make sense to 
request unit affinity where both data sets are on different types of 
volumes. The format of the UNIT parameter for requesting unit affinity 
is: 



UNIT= AFF= ddname 



Replace the term "ddname" with the name of an earlier DD statement in 
the job step. Whenever it is required, the volume of the earlier data 
set will be demounted and the cataloged data set will be mounted on the 
same unit. If the ddname refers to a DD statement that defines a dummy 
data set, the data set defined on the DD statement requesting unit 
affinity is assigned a dummy status. 
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When unit affinity is requested for two data sets that reside on 
different 2321 volumes, the data sets are assigned the same device but 
can be assigned different bins. If the data sets are assigned different 
bins, the implied deferred mounting is ignored. 

In the following example, the DD statement named DD2 requests that 
the system assign the same number of units to this data set as it 
assigns to the data set defined on the statement named DDL Since DD1 

//STEPC EXEC PGM=OVER 

//DD1 DD UNIT=(2400,2) ,VOLUME=( , , , 2) 



VOLUME : The VOLUME parameter is needed only when one or more of the 
following conditions are met: 

1. You want the volume on which the cataloged data set resides to be 
private. A private volume is one that cannot be allocated to a new 
temporaty data set that makes a nonspecific request for a public 
volume. 

2. You want the private volume to remain mounted at the end of the job 
step. 

3. You want to begin processing with a certain volume when you are 
retrieving or extending a multi volume cataloged data set. 
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The format of the VOLUME parameter for cataloged data sets is: 

r : — —-■ — ' 1 

| VOLUME= ( I PRIVATE] |, RETAIN] [, sequence]) | $ 



[■ 



The PRIVATE subparameter means that you want the volume (s) on which the 
cataloged data set resides to be private. The RETAIN subparameter means 
that the volume will not be demounted at the end of the step. PRIVATE 
must be coded when you code RETAIN. (RETAIN has the same effect on 
volume mounting as coding PASS in the DISP parameter. ) Private volumes 
are demounted at the end of the step unless it is an unremovable volume, 
such as a 2301, or unless it has been designated by your installation to 
be a permanently resident volume, for example, the system residence 
volume. It is recommended that you use the RETAIN subparameter whenever 
you want the volume to remain mounted at the end of the step. 



For example, if you want the volume that contains the JOE. DOE. SMITH 

//OLD DD DSNAME=JOE. DOE. SMITH, DISP=QLD,VOLUME=PRIVATE 

Using the same example, if you want the volume to remain mounted at 
the end of the step, code: 

//OLD DD DSNAME=JOE. DOE. SMITH, DISP=OLD,VOLUME=( PRIVATE, RETAIN) 

Using the same example, if you want to defer mounting of the volumes, 
//OLD DD DSNAME=JOE. DOE. SMITH, DISP=OLD,VOLUME=( PRIVATE, RETAIN), 

When you are retrieving a multi volume cataloged data set, you can 
begin processing with other than the first volume of the data set by 
coding the sequence number subparameter. Replace "sequence" with a 
number from 1 to 255 that indicates the sequence number of the volume 
you want. For example, if you want the third volume of the cataloged 

The sequence number is a positional subparameter and must follow the 
PRIVATE and RETAIN subparameters. If you omit the sequence number 
subparameter and the volume count subparameter follows, you must 
indicate its absence by a comma. 

In the following example, you are retrieving a cataloged data set 
named SYSTEM. TWO. SYSTEM. TWO now resides on four volumes and you want 

//IN DD DSNAME=SYSTEM.TWO,DISP=OLD,VOLUME=(,,2) 

Using the same example, if you want the volumes to be private, code: 
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LABEL ; The LABEL parameter is needed if the cataloged data set does not 
have standard labels. You must code the same label type you specified 
when you defined the data set. 



The format of the LABEL parameter for cataloged data sets is: 



,SUL 
| LABEL= ( 1 , NL ( ) 
I j » NSL 

,BLP 



code, 
SUL 



NL 



NSL 



BLP 



if the data set has standard and user labels. 



if the data set has no labels. 



if the data set has nonstandard labels. 



to bypass label processing. 
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In the following example, a cataloged data set named A.B.D is 
retrieved. A.B.D has nonstandard labels. 

//INPUT DD DSNAME=A.B.D,DISP=OLD,LABEL=(,NSL) 



Data Attributes 

The DCB parameter is needed only if the cataloged data set is on 
magnetic tape and has nonstandard labels or no labels. Follow the 
instructions given for "Magnetic Tape" in the section "Creating a New 
Data Set." If the data set has standard labels, you can specify the 
subparameters shown in Tables 19, 20, 21, and 22. 

Special Processing Options 

There are three special processing options for cataloged data sets: 

1. You can request channel separation from other data sets in the same 
job step using either the SEP or the AFF parameter. 

2. You can suppress I/O operations on a sequential data set (magnetic 
tape or direct access) using the DUMMY parameter. 

3. For systems with MVT and TSO, you can defer the definition of a 
data set until you need it using the DYNAM parameter. 
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Table 19. DCB Subparameters for Retrieving a Data Set on Magnetic Tape 



DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


I 3 
ANS COBOL ■— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




ll! 

ForD 














BFTEK= 




h.2 

S, E, or A «— 
i (QSAM only) 














BUFL= 




Ll 

number of bytes 














BUFNO= 




Ll 

number of buffers 


number of buffers 


Ll 

number of buffers 


number of buffers 


1 or2 


1 orl 


Li 

number of buffers 


Ll 

BUFOFF 




n or L 


n or L 


n or L 


n or L 


n or L 


n or L 


n or L 


EROPT= 




Li 

ABE,ACC, or SKP 


ABE.ACC, or SKP 


ABE.ACC, or SKP 


ABE,ACC 7 or SKP 








HIARCHY= 




Oor 1 














NCP= 




Li 

number of channel 
programs (BSAM only) 












LL 

number of channel 
programs 
(BSAM only) 


OPTCD= 




[C][Z][B] Li " 
[Qj (ASCII) 


'[C] 
TO] (ASCII) 


[c] 

[Qj (ASCII) 


[c] 


[c] [c] 

[Q] (ASCII) 


[C] or [Zj 
[Qj (ASCII) 


1 This function can be specified in your program rather than in the DD statement. 

2 For QSAM, you must specify both BFALN, and BFTEK on the DD statement, or omit both. 

3 American National Standard COBOL. 

This parameter is specified only For ASCII data sets on magnetic tape. 
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Table 20. DCB Subparameters for Retrieving a Sequential Data Set 
on Direct Access Device 



DCB 
Subparameter 


ALGOL 


Assembler 


COBOL E 


COBOL F 


ANS COBOL ■— 


FORTRAN E 


FORTRAN G & H 


PL/I F 


BFALN= 




ForD 














BFTEK= 




S,E,orA l — 
(QSAM only) 














BUFL= 




Ll 

number of bytes 














BUFNO= 




Li 

number of buffers 


Ll 

number of buffers 


LL 

number of buffers 


Ll 

number of buffers 


1 or 2 


1 or 2 


Ll 

number of buffers 


EROPT= 




Li 

ABE,ACC, orSKP 


ABE,ACC, orSKP 


ABE,ACC, orSKP 










HIARCHY= 




Oor 1 














NCP= 




Li 

number of channel 
programs (BSAM only) 














This parameter can be specified in your program rather than in the DD statement. 

For Q SAM, you must specify both BFALN and BFTEK on the DD statement, or omit both. 

American National Standard COBOL. 
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Table 21. DCB Subparameters for Retrieving a Direct Data Set 



DCB 
Subparameter 


Assembler 


COBOL E 


COBOL F 


ANS COBOL — 


FORTRAN E 


FORTRAN G 


PL/I F 


BFALN= 


Ljl 

For D 














BFTEK = 


Li 














BUFL= 


Ll 

number of bytes 














BUFNO= 


Li 

number of buffers 








1 or! 


1 or! 


number of buffers 


HIARCHY= 


or 1 , 














LIMCT= 


Lu 

number of tracks 
or blocks 












number of tracks 
or blocks 


OPTCD= 


MH 


H * 














This function can be specified in your program rather than in the DD statement. 
American National Standard COBOL. 



Table 22. DCB Subparameters for Retrieving a Partitioned Data Set 
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DCB 
Subparameter 


Assembler 


BFALN- 


Ll 

For D 


BUFL= 


Ll 

number of bytes 


BUFNO= 


Ll 

number of buffers 


HIARCHYf 


Ll 

Oor 1 


NCP^= 


number of channel 
programs 


OPTCD= 


H ^ 


This parameter can be specified in your program rather 
than in the DD statement. 




SEP ; When two or more data sets are to be used in a job step, 
processing time may be shortened by requesting that the system transmit 
data sets over separate channels. For example, it would be faster to 
have your input data set and your output data set on separate channels 
than to have them on the same channel. 

You can request channel separation for data sets in each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type on different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with the UNIT 
parameter. 

The format of the SEP parameter is: 



SEP= ( ddname, . . . ) 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. These earlier DD statements can define 
any type of data set: new or existing, on magnetic tape or direct 
access, temporary or nontemporary , etc. 

In the following example, you request that the data set defined by 
the FOUR DD statement be assigned to a channel other than the ones 
assigned to the data sets defined by the ONE and TWO DD statements. The 
data sets defined by ONE and TWO may or may not be on the same channel. 
The data set defined by THREE may or may not be on the same channel as 
any of the other three data sets. 



//PR0G1 EXEC PGM= PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL=(,NL) 
DSNAME=SYSTEM. USER. ABC, DISP=OLD 
DSNAME=HELP,DISP=(,KEEP) ,UNIT=2314, 
VOLUM E=S ER= AFL , L A£EL=R ETPD= 3 1 
DSNAME=END,DISP=OLD,UNIT=2400-2, 
V0LUME=SER=TAPE7 5 , SEP= ( ONE, TWO) 



//TWO DD 

//THREE DD 

// 

//FOUR DD 

// 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 



//PR0G1 EXEC PGM=PROCESS 

//ONE DD UNIT= 24 00, VOLUME-PRIVATE, LABEL=(,NL) 
DSNAME=SYSTEM. USER. ABC, DISP=OLD 
DSNAME=HELP,DISP=(,KEEP),UNIT=2314, 
VOLUME=SER=AFL,LABEL=RETPD=31 ,SEP=TWO 
DSNAME=END,DlSP=OLD,UNIT=2400-2, 
VOLUME=SER=TAPE75,SEP= (ONE, TWO) 



//TWO DD 

//THREE DD 

// 

//FOUR DD 

// 



As a result of this example, the data sets defined by ONE and TWO may or 
may not be on the same channel. The data sets defined by THREE and FOUR 
may or may not be on the same channel, but neither one will be on the 
same channel as the data set defined by TWO. Also, the data set defined 
by FOUR will not be on the same channel as the data set defined by ONE. 



( 
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Remember that the request for channel separation made with the SEP 
parameter is only a suggestion to the system for more efficient 
operation, and not a requirement. If your data set must be on separate 
channels specify unit addresses with the UNIT parameter. You can obtain 
a configuration chart with all the unit addresses from your manager or 
supervisor. 



AFF ; The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same separation using the AFF 
parameter in the later data sets. The AFF parameter tells the system 
that you want the data set defined on this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 

The format of the AFF parameter is : 



AFF=ddname 



Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separation. This data set and the earlier data set 
may or may not be on the same channel. 
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In the following example, the data sets defined by DD1 and DD2 may or 

may or may not be on the same channel, but neither one will be on the 

defined by DDU will not be on the same channel as the data set defined 
by DD3, but it may be on the same channel as the data sets defined by 
DD1, DD2, or DD5. 



//STEP EXEC PGM=METH0D2 
//DD1 DD 



//DD2 
//DD3 
//DDU 
//DD5 



DD 
DD 
DD 
DD 



SEP=(DD1,DD2), .: 
SEP=DD3, ... 
AFF=DD3 t ... 



The requests for channel separation and affinity are only suggestions to 
the system. They will be honored if the appropriate devices are 
available. 



DUMMY ; The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing programs ask to read the dummy 
data set, the read request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
reading of a data set until you are sure your program is going to 
process it correctly. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example; 

//IN DD DUMMY, DSNAME=ABLE, DISP=0LD, LABEL= ( ,NL) , DCB=BLKSIZE=1 00 
//DDT DD DUMMY, DSNAME=BAKER,DISP=OLD 



The DD Statement 20 5 



If you wish, you can omit all other parameters required to define 
your data set except DCB. (If you were not going to write the DCB 
parameter you do not have to write it.) For example, the two DD 

//IN DD DUMMY, DCB=BLKSIZE=1 00 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve 
the data set. For example: 

//IN DD DSNAME=ABLE, DlSP=OLD,LABEL-( ,NL) ,DCB=BLKSIZE-100 



DYNAM : In TSO LOGON procedures, the DYNAM parameter allows you to 
retrieve a cataloged data set on a direct access device at some time 
after you have started your terminal session. In the background, the 
DYNAM parameter has the same meaning as DUMMY. Like DUMMY, DYNAM is a 
positional parameter. However, no other parameters may be coded with 
the DYNAM parameter. 



KEPT DATA SET 

A kept data set is a nontemporary data set defined with the DISP=(,KEEP) 
parameter. The parameters shown in Table 16 are used to retrieve a kept 
data set. 

This section is summarized in Table 72 of Appendix D. 



Data Set Information 

The DSNAME and DISP parameters are required. 



DSNAME: The format of the DSNAME parameter is: 



| (dsname ) 

| DSNAME=\dsname(membername)/ 



Replace the term "dsname" with the name of the kept data set. For 
example, if you created the data set as DSNAME=NONO you must again code 

If you are retrieving a member of a partitioned data set, you must 
code the member name in parentheses after the data set name. For 

DSNAME=COLOR (BLUE) 
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DISP : The format of the DISP parameter is: 



I /OLD} 
| DISP=((SHR/ 



■, KEEP 



, CATLG 
, DELETE 



;keep -i 



, CATLG 
, DELETE 



You must code either OLD or SHR. OLD indicates that you are retrieving 
the data set and requesting exclusive control of it. In order to modify 
a data set, you must have exclusive contorol of the data set. SHR 
indicates that jobs that are executing concurrently with this job step 
may simultaneously use the data set. When SHR is specified, any job 
that uses the data set should only read the data set. Once you specify 
SHR for a data set, every reference to that data set within the job must 
specify SHR or the data set can no longer be used by concurrently 
executing jobs. 

Note ; Caution should be observed when specifying SHR for IBM processor 
data sets since no provision is made for acquiring exclusive control of 
the data sets prior to writing (e.g., SYSGO for the Assembler). For 
more information on sharing a data set and on gaining exclusive control 
of a data set when you have specified SHR, refer to the Data Management 
Services publication. 
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The second positional subparameter tells the system what is to be 
done with the data set at the end of the job step* If you omit this 
subparameter the data set remains kept. If you code CATLG the data set 
will be cataloged. If you code DELETE the data set is deleted. 

The third positional subparameter tells the system what is to be done 
with the data set if the step ABENDS. If you omit this subparameter the 
data set remains kept. You can specify instead CATLG or DELETE. 

Note ; When you are retrieving a member of a partitioned data set, the 
disposition (KEEP, CATLG, or DELETE) you specify applies to the entire 
data set. If you want to delete a particular member, you must use the 
IEHPROGM utility program. 

In the following example you are retrieving ke^t data set named 
FRANK. FRANK resides on a 2314 volume named ABCXYZ. 

//#75 DD DSNAME=FRANK,DISP=SHR,UNIT=2314,VOLUME=SER=ABCXYZ 

In the following example, you are retrieving a member of a kept data 
set named FILE. FILE resides on a 2311 volume named PACK70. You want 
to catalog the entire partitioned data set after you use the member. 
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Location of the Data Set: 

The UNIT and VOLUME parameters are required. The LABEL parameter is 
required only if the data set does not have standard labels or if it is 
not the first data set on a tape volume. 



UNIT : You can use the UNIT parameter to directly specify units for your 
data set or to request the same units used for an earlier data set in 
the job step (unit affinity) . 



Requesting Units : The format of the UNIT parameter for directly 
specifying units for your data set is : 



( unit address) r,unitcount] 
UNIT= (I device type } ,P £, DEFER] ) 



group name 



It 



The first positional subparameter identifies the tape drive or direct 
access you want to use for your data set by its address, or unit name, 
or group name. 



unit address 

is the actual machine address of the direct access device. For 



You should not specify the address unless you are sure you want it. 
Do not specify an address if you are going to need more than one 
unit for the data set. (Multiple units are requested with the 
second parameter of the UNIT parameter.) 



device type 

corresponds to the type of device. Coding a device type provides 
you with a certain degree of device independence in that your data 
set may be placed in any number of devices of the same type. F" 
example, if you code 

your data set uses any 2311 Disk Storage Drive. The following 
device types can be specified. 
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Device Type Description 

2301 2301 Drum Storage Unit 

2302 2302 Disk Storage Drive 

2303 Any 2303 Drum Storage Unit 

2305-1 2305 Fixed Head Storage Facility Model 1 

2305-2 2305 Fixed Head Storage Facility Model 2 

2311 2311 Disk Storage Drive 

2314 2314 Storage Facility 

2319*- 2319 Disk Storage Facility 

2321 Any bin mounted on a 2321 data cell drive 

2400 2400 series Nine-Track Magnetic Tape Drive that can 
be allocated to a data set written or to be written 
in 800 bpi density when the dual density feature is 
not installed on the drive, or in 1600 bpi when the 
dual-density feature is installed in the drive. 

2400-1 2400 series Magnetic Tape Drive with Seven-Track 
Compatibility and without Data Conversion 

2400-2 2400 series Magnetic Tape Drive with Seven-Track 
Compatibility and Data Conversion 

2400-3 2400 series Nine-Track Magnetic Tape Drive that can 
be allocated to a data set written or to be written 
in 1600 bpi density. 

2400-4 2400 series Nine-Track Magnetic Tape Drive having an 
800 and 1600 bpi capability. 

3330 3330 Disk Storage Drive 

*To indicate the 2319 in the UNIT parameter, specify UNIT=2314, 
However, to designate the 2319 as the particular device for your 
data set, specify UNlT=unit address. 

group name 

is the name of a collection of devices, selected by your 
installation during system generation. For example, your 
installation might select the name TAPE for all tape drives in the 
configuration. If you do not care which tape drive is used for 
your data set, you would then code 

Your manager or supervisor should tell you which group names were 
generated for your installation. 

The second positional subparameter is used only if your data set has 
more than one volume and if you want more than one of these volumes to 
be mounted at the same time. This subparameter indicates how many 
drives are to be used for mounting your data set's volumes. 




C 



Retrieving 



Kept 
Data Set 



The DD Statement 209 



unit count 

indicates how many units you want assigned to the data set. You 
can specify a maximum of 59 units per DD statement. Make sure that 
your system has at least the number of units you specify. 
Otherwise an error will result. If you specify fewer units than 
the number of volumes in your data set, only the same number of 
volumes as there are units can be mounted at the same time. (If 
you request fewer units than volumes code the PRIVATE subparameter 
in the VOLUME parameter.) If you specify the same number of units 
as there are volumes, all volumes can be mounted at the same time. 

P 

specifies parallel mounting. When you request parallel mounting 
the system counts the number of serial numbers specified with the 
VOLUME parameter and assigns to the data set as many units as there 
are serial numbers. 

DEFER is the third positional subparameter. DEFER requests the 
system to assign the required tape drives or direct access devices to 
the data set and to defer the mounting of the volume or volumes until 
the processing program attempts to open the data set. Operating 
efficiency may decrease if you specify DEFER for a tape data set. If 
DEFER is coded for a tape data set, the system issues a mount message to 
the operator when the processing program attempts to use the data set 
and then waits until the volume is mounted. If you do not code DEFER, 
the mount message is issued when the device is assigned and there is no 
waiting for the operator. By the time your program tries to use the 
data set, it is very likely that the operator has already mounted the 
volume and that the system will not have to wait for him. 



Unit Affinity : To conserve the number of units in a job step, you can 
request that the kept data set be assigned to the same device or devices 
as assigned to an earlier data set in the same step. This technique, 
known as unit affinity, indicates that you want the volumes on which the 
kept data set resides and the volumes used by the earlier data set to be 
mounted on the same devices in sequential order. Unit affinity implies 
deferred mounting for one of the volumes since both volumes cannot be 
mounted at the same time. Before you request unit affinity, make sure 
that both sets use the same type of removable volumes ; for example, 
bothdata sets could be on 2314 volumes, or both on 24 00 volumes. It 
does not make sense to request unit affinity when both data sets are on 
different types of volume . 

The format of the UNIT parameter for requesting unit affinity is: 

r ■ ■ ' n 

| UNIT=AFF=ddname | 

L . . J 



Replace the term "ddname" with the name of an earlier DD statement in 
the job step. Whenever it is required, the volume of the earlier data 
set will be demounted and the cataloged data set will be mounted on the 
same unit,. If the ddname refers to a DD statement that defines a dummy 
data set, the data set defined on the DD statement requesting unit 
affinity is assigned a dummy status. 

When unit affinity is requested for two data sets that reside on 
different 2321 volumes, the data sets are assigned the same device but 
can be assigned different bins. If the data sets are assigned different 
bins, the implied deferred mounting is ignored. 
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In the following example, the DD statement named DD2 requests that 
the system assign the same number of units to this data set as it 
assigns to the data set defined on the statement named DDL Since DD1 
requests two devices, these two device are assigned to the data set 
defined by DD2. 

//STEPC EXEC PGM=OVER 

//DD1 DD UNIT=(2400,2),VOLUME=(,,,2) 

//DD2 DD DSNAME=ALPHA.DISP=OLD, f 

// V0LUME=SER=(TAPE22,TAPE23),UNIT=AFF=DD1 

VOLUME : The format of the VOLUME parameter for kept data sets is: 

r 

| VOLUME=( [PRIVATE] f, RETAIN J SER= (serial, ... ) 



[, RETAIN,] 
J 




The PRIVATE subparameter means that you want the volume (s) on which the (Z> • 

kept data set resides to be private. (A private volume is one that I Retrieving 

cannot be allocated to a new temporary data set that makes a nonspecific 

request for a public volume.) The RETAIN subparameter means that the 



request ror a puoj.ic voxume.j xne K.iiTA.LJM sucparameter means -tnat trie x 

volume will not be demounted at the end of the step. PRIVATE must be ( Ke P* 

coded when you code RETAIN. (RETAIN has the same effect on volume V Data Set 

mounting as coding PASS in the DISP parameter.) Private volumes are 

demounted at the end of the step unless it is an unremovable volume, 

such as a 2301, or unless it has been designated by your installation to 

be a permanently resident volume, for example, the system residence 

volume. It is recommended that you use the RETAIN subparameter whenever 

you want the volume to remain mounted at the end of the step. If there 

are more volumes than devices, only the last volumes mounted 

simultaneously are retained. 

The SER subparameter identifies the serial numbers of the volumes on 
which your data set resides. Replace the term "serial" with the l-to-6 
character serial number associated with the volume. The volume serial 
number can contain any alphameric and national characters and the 
hyphen. If it is necessary to include special characters, other than a 
hyphen, in the volume serial number, enclose it in apostrophes, for 
example, 

VOLUME=SER=(54AB2 / i 6/10/8* ). 

If only one volume is involved you need not code the parentheses, for 
example, 

VOL=SER=ABCDEF. 

be used and the last volume used is to remain mounted at the end of the 

// VOLUME=(PRIVATE,RETAIN,SER=(AA22,ABU5)) 

In the following example, you retrieve the same data set, A99, but 

//DD99 DD DSNAME=A99,DISP=OLD,UNIT=(TAPE,P), 

// VOLUME= (PRIVATE , RETAIN , SER= (AA22 , AB45) ) 
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In the case of multivolume data sets, give only the serial numbers of 
the volumes you want to process in the order you want to process them. 
For example, you want to retrieve a kept data set named PLUS. PLUS 
resides on volumes A24, A25, A26, and A27, but you only want to process 
volumes A25, and A27, in that order. Only one tape drive named TAPE2 



//DDT DD DSNAME=PLUS,DISP=OLD, 

// UNIT=TAPE2,VOLUME=SER=(A25, A27) 



LABEL : The LABEL parameter is used only if the kept data set does not 
have standard labels, or if the data set is not the first data set on a 
tape volume. The format of the LABEL parameter for kept data sets is: 




The first positional subparameter indicates the order of your data set 
on the tape volume. You only have to specify a sequence number if your 
data set is not the first data set on the volume. If you do not specify 
a sequence number and there are other data sets on the volume, your data 
set cannot be retrieved and the step will ABEND. Replace the term 
"sequences" with the sequence number of your data set. For example, if 

Note : If you request the system to bypass label processing (specify BLP 
in the second positional subparameter of the LABEL parameter), the 
system treats anything within tape marks as a data set. Therefore, if 

you want your data set to be written in the proper sequence, you must 
include all header and trailer labels and data sets that precede your 
data set in the sequence number subparameter. 

The second positional subparameter indicates the label type of your 
data set. Code: 



SUL 



AL 



AUL 



NL 



NSL 



BLP 



if the data set has standard and user labels. 



if the data set has American National Standard labels. 



if the data set has both American National Standard labels and 
American National Standard user labels. 



if the data set has no labels. 



if the data set has nonstandard labels 



to bypass label processing. 
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In the following example a kept data set named BLUE is retrieved. 
BLUE is the fourth data set on a tape volume named TAPE2. The data set 

//T77 DD DSNAME=BLUE,DISP=OLD,UNIT=2400,VOLUME=SER=TAPE2,LABEL=4 

Using the same example, if the data set has no labels, code: 

//111 DD DSNAME=BLUE,DISP=OLD,UNIT=2400,VOLUME=SER=TAPE2, 
// LABEL=(4,NL) 



Data Attributes 

The DCB parameter is needed only if the kept data set is on magnetic 
tape and has no labels or nonstandard labels. Follow the instructions 
given for "Magnetic Tape" in the section "Creating a New Data Set". If 
the data set has standard labels, you can specify the subparameters 
shown for "Cataloged Data Sets" in Tables 19, 20, 21, and 22. 

Special Processing Options 

There are three special processing options for kept data sets: 

1. You can request channel separation from other data sets on the same 
job step using either the SEP or AFF parameter. 

2. You can suppress I/O operations on a sequential data set (magnetic 
tape or direct access) using the DUMMY parameter. 

3. For systems with MVT and TSO, you can defer the definition of a 
data set until you need it using the DYNAM parameter. 
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SEP : When two or more data sets are to be used in a job step, 
processing time may be shortened by requesting that the system transmit 
data sets over separate channels. For example, it would be faster to 
have your input data set and your output data set on separate channels 
than to have them on the same channel. 

You can request channel separation for data sets in each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type on different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with the UNIT 
parameter. 



The format of the SEP parameter is : 



| SEP=(ddname, . ..) 

L 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. The earlier DD statements can define 
any type of data set: new or existing, on magnetic tape or direct 
access, temporary or nontemporary , etc. 
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In the following example, you request that the data set defined by 
the FOUR DD statement be assigned to a channel other than the ones 
assigned to the data sets defined by the ONE and TWO DD statement. The 
data sets defined by ONE and TWO may or may not be on the same channel. 
The data set defined by THREE may or may not be on the same channel as 
any of the other three data sets. 



//PROG1 EXEC PGM=PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL= (,NL) 

//TWO DD DSNAME=SYSTEM. USER. ABC, DISP=OLD 

//THREE DD DSNAME=HELP,DISP= ( ,KEEP) ,UNIT=2314 , 

// V0LUME=SER=AFL,LABEL=RETPD=31 

//FOUR DD DSNAME=END,DISP=OLD,UNIT=2400-2, 

// VOLUME=SER=TAPE75,SEP=(ONE,TWO) 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement may be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 



r 1 

j //PROG1 EXEC PGM=PROCESS 

| //ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL=(,NL) 

DSNAME=SYSTEM. USER. ABC, DISP=OLD 

DSNAME=HELP.DISP=(,KEEP),UNIT=2314, 

VOLUME=SER=AFL,LABEL=RETPD=31 f SEP=TWO 

DSNAME=END, DISP=OLD, UNIT=2U00-2, 

VOLUME=SER=TAPE75 , SEP= (ONE ,TWO) 



| //TWO DD 

1 //THREE DD 
// 
//FOUR DD 

9ti 



j 



As a result of this example, the data sets defined by ONE and TWO may or 
may not be on the same channel. The data set defined by THREE and FOUR 
may or may not be on the same channel, but neither one will be on the 
same channel as the data set defined by TWO. Also, the data set defined 
by FOUR will not be on the same channel as the data set defined by ONE. 

Remember that the request for channel separation made with the SEP 
parameter is only a suggestion to the system for more efficient 
operation, and not a requirement. If your data set must be on separate 
channels specify unit addresses with the UNIT parameter. You can obtain 
a configuration chart with all the unit addresses from your manager or 
supervisor . 



AFF: The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same separation using the AFF 
parameter in the later data sets. The AFF parameter tells the system 
that you want the data set defined on this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 

The format of the AFF parameter is : 



j AFF=ddname 



Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separation. This data set and the earlier data set 
may or may not be on the same channel. 



< 
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In the following example, the data sets defined by DD1 and DD2 may or 

may not be on the same channel. The" -data -sets defined^•b^;ii3S3« : al||;;iiBlXS:^ ; , ; 
may or may not be on the same channel, but neither ohe'' ? wI'iM*^r:b^^^'ttfi*j: : 'ij- 
same channel as the data sets defined by DD1 or DD2. The data set 
defined by DDU will not be on the same channel as the data set defined 
by DD3, but it may be on the same channel as the data sets defined by 
DD1, DD2, or DD5. 



//STEP EXEC PGM=METHOD2 
//DD1 DD 



| //DD2 

| //DD3 

//DD4 

//DD5 

L 



DD 
DD 
DD 
DD 



SEP=(DB1,DD2), ... 
SEP=DD3 f ... 
AFF=DD3,... 




The requests for channel separation and affinity are only suggestions to 

the system. They will be honored if the appropriate devices are 

available. /" ' 
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DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing program asks to read the dummy 
data set, the read request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
reading of a data set until you are sure your program is going to 
process it correctly. 
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The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

// VOLUME=SER=7942,LABEL=(,NSL),DCB=DEN=2 

//P7 9 DD DUMMY, DSNAME=TOM,DISP=OLD,UNIT=2311,VOLUME=SER=A27941 

If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve 
the data set. For example: 

// LABEL=(,NSL),DCB=DEN=2 



DYNAM: In the TSO LOGON procedures, the DYNAM parameter allows you to 
retrieve a kept data set on a direct access device at some time after 
you have started your terminal session. In the background, the DYNAM 
parameter has the same meaning as DUMMY. Like DUMMY, DYNAM is a 
positional parameter. However, no other parameters may be coded with 
the DYNAM parameter. 
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Table 23. Parameters for Extending a Data Set 



Data Set 


Parameter Type 


Parameter 


Comments 


Passed 
Data Set 


Data set information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Required only if you want more units 


VOLUME 


Required only if you need more volumes 


LABEL 


Required only if the data set does not have IBM Standard labels 


Size of the data set 


SPACE 


Required only if you want to override the secondary quantity 


Data Attributes 


DCB 


May be required if data set does not have IBM standard labels 


Special Processing Option 


DUMMY 


Optional 


Cataloged 
Data Set 


Data set information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Optional 


VOLUME 


Required only if you need more volumes 


LABEL 


Required only if the data set does not have IBM standard labels 


Size of the data set 


SPACE 


Required only if you want to override the secondary quantity 


Data Attributes 


'DCB 


Required only if the data set does not have IBM standard labels 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


DYNAM 


Optional. Meaningful only for systems with MVT and TSO 


Kept 
Data Set 


Data set information 


DSNAME 


Required 


DISP 


Required 


Location of the data set 


UNIT 


Required 


VOLUME 


Required 


LABEL 


Required only if data set does not have IBM standard labels 


Size of the data set 


SPACE 


Required only if you want to override the secondary quantity 


Data Attributes 


DCB 


Required only if the data set does not have IBM standard labels 


Special Processing Options 


SEP 


Either parameter can be used 


AFF 


DUMMY 


Optional 


DYNAM 


Optional. Meaningful only for systems with MVT and TSO 
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Extending an Existing Data Set 

You can only extend with additional output data sets on magnetic tape or 
sequential data sets on direct access devices. You cannot extend a 
direct data set or a member of a partitioned data set using JCL 
facilities. You can, however, add more members to a partitioned data 
set using JCL facilities. (The publication IBM System/ 3 60 Operating 
System; Data Management Services explains how to extend a direct data 
set or a member of a partitioned data set.) 

Data sets on magnetic tape or direct access devices are extended in 
similar ways depending on whether they were passed, cataloged, or kept 
when you created them. This chapter describes how to extend or add more 
members to: 

• Passed data sets. 

• Cataloged data sets. 

• Kept data sets. 

Table 23 shows the parameters required to extend a data set. Please I Extending 
fold out Table 23 while reading this chapter. 




Notes: [ J** 8 *!* 1 

Data Set 



• When you extend a data set, the read/write mechanism is 
automatically positioned after the last record in the data set. 

• If you extend a data set that has fixed block standard (FBS) records 
and the last block was a truncated one, an end-of-data set condition 
occurs when the truncated block is encountered. If an attempt is 
made to read the data set backward on magnetic tape, processing is 
terminated immediately (with an end-of-data set condition) upon 
reading the truncated block. 

• When you are extending or adding members to a data set on a direct 
access device , make sure that there is enough room left in the 
primary quantity for the additional output or that you requested a 
secondary quantity when you defined the data set. 



C 



PASSED DATA SET 

A passed data set is one you defined with the DISP=(,PASS) parameter. 
The most common type of passed data set is a "temporary for the duration 
of the job" data set, although you can also have nontemporary passed 
data sets. 

A passed data set can only be extended in the same job it was 
created. However, if you have a nontemporary passed data set, you can 
change its disposition to KEEP or CATLG when you extend it so that it 
can be retrieved or extended in other jobs. 

The parameters shown in Table 23 are used to extend passed data sets. 
Remember that you can extend any sequential passed data set, but you can 
only add members to a partitioned data set. 

This section is summarized in Table 73 of Appendix D. 
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Data Set Information 

The DSNAME and DISP parameters are required. 



PS NAME : You can identify the passed data set in one of two ways: 

1. Giving its name exactly as it appeared in the DD statement where 
you defined it, or 

2. Making a backward reference to the DD statement that defined the 
data set. 

Both ways are equally valid, but the second is more useful because if 
you decide to change the data set*s name you only have to change it in 
the original DD statement. You must identify the partitioned data set 
by name when you are adding a member. 

1. The format of the DSNAME parameter for identifying the passed data 
set by name is : 



DSNAME= 



dsname 

dsname ( membe r name ) 

SSname 

££name( member name) 

Sname 

Sname ( member name ) 



L — 




Replace "dsname" with the name of the passed data set you are 
extending. If you are adding a new member replace "membername" 
with the name of the new member. The membername is enclosed in 
parentheses and consists of one to eight alphameric or national 
(a,$,#) characters. The first character must be a letter or 
national character. For example, if you are adding a member named 
#2 to a partitioned data set named GEORGE, code: 

DSNAME=GEORGE( #2) 

2. The format of the DSNAME parameter for identifying the passed data 
set with a backward reference is : 



DSNAME= 



* . ddname 

* . stepname . ddname 

* . stepname . procstepname . ddname 



Replace "ddname" with the name of the DD statement where the passed 
data set is defined. Replace "stepname" with the name of the EXEC 
statement of the step that has the earlier DD statement. If the 
earlier DD statement is contained in the same step, omit the 
stepname, i.e., 

DSNAME=* . ddname 



When the earlier DD statement is contained in a cataloged procedure 
step, you must give both the name of the job step that invokes the 
procedure and the procedure stepname, i.e., 

DSNAME=* . stepname . procstepname . ddname 



< 



220 JCL User's Guide (Release 20.1) 



The following example shows how to code the DSNAME parameter to 
identify a passed data set defined in a previous step. 



//STEP2 EXEC ... 

//TEMP DD DISP= ( , PASS) , 



//STEPU EXEC ... 

//USE DD DSNAME=*.STEP2.TEMP, 



L_, 



The following example shows how to code the DSNAME parameter to 

The first part of the example shows your input deck; the second 
part shows a cataloged procedure called by the STEP3 EXEC statement 




C 
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DISP : The DISP parameter indicates that you are extending the passed 
data set. You can code the DISP parameter in one of two ways depending 
on whether other steps in the job will also use the data set or whether 
this is the last time you are using the data set. 

1. The format of the DISP parameter for passing the data set to a 
subsequent job step is: 



D ISP= (MOD , PASS T, DELETE"] ) 
CATLG 
KEEP J 



[; : 
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You must code MOD. Specifying MOD as the first subparameter tells 
the system that when data set is opened for output, the read/write 
mechanism is to be positioned after the last record in the data 
set. In order to extend a data set, you must have exclusive 
control and you gain exclusive control by specifying MOD. The PASS 
subparameter is required and it indicates that the data set can be 
used by later steps in the job. The third subparameter tells the 
system what to do with the data set if the step terminates 
abnormally. You can specify DELETE for both temporary and 
nontemporary data sets; you can specify KEEP or CATLG only if the 
data set is nontemporary. If you omit the third subparameter, the 
system uses the disposition specified as the second subparameter to 
determine what to do with the data set. In this case, the data set 
will be passed. 

Note : When you are adding a member to a partitioned data set, the 
disposition (PASS., DELETE, CATLG, or KEEP) you specify applies to 
the entire data set and not to the one member. If you want to 
delete a particular number of a nont empora ry partitioned data set 
you must use the IEHPROGM utility program. The entire temporary 
partitioned data set is deleted at the end of the job. 



2. The format of the DISP parameter for the last time you use a passed 
temporary data set in a job is: 



i 1 

| DISP= (MO D, DELETE, DELETE ) | 

l : j 



You must code MOD. A passed temporary data set will always be 
deleted at the end of the job so you do not have to code the DELETE 
s ubpar amet e rs . 

The format of the DISP parameter for the last time you use a passed 
non- temporary data set in a job is: 



DISP= (MOD 



,KEEP 



, DELETE 
, CATLG 



',KEEP "1 
, DELETE ) 
, CATLG J 



You must code MOD. Specifying MOD as the first subparameter tells 
the system that when the data set is opened for output, the 
read/write mechanism is to be positioned after the last record in 
the data set. In order to extend a data set, you must have 
exclusive control and you gain exclusive control by specifying MOD. 
A passed nontemporary data set will be kept at the end of the job 
unless you specify DELETE or CATLG. If the step abnormally 
terminates, the data set will also be kept unless you specify 
DELETE or CATLG. 



( 
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In the following example, two data sets named S6DATA (with a member 
named MEM1) and LIST are defined in the first step of a job. In the 
second step, a new member named MEM2 is added to S£DATA and passed 

passed again. In the fourth step, 6£DATA is retrieved. The entire 
S€DATA data set is deleted at the end of the job. LIST is extended 



//MYJOB JOB 

//STEP1 EXEC PGM=UNO 

//DS1 DD 

7/ 

//DS2 DD 



DSNAME=&6DATA(MEM1) ,DISP= (,PASS) ,UNIT=2311, 
VOLUME=PRlVATE,SPACE=(TRK, (25, , 3) ) 
DSNAME=LIST,DISP=(,PASS) ,UNIT=2400 



//STEP2 EXEC PGM=DOS 

//DD3 DD DSNAME=6SDATA(MEM2),DISP=(M0D,PASS) 



//STEP3 EXEC PGM=TRES 

//DSU DD DSNAME=LIST,DISP= (MOD, PASS) 



//STEP 4 EXEC PGM=CUATRO 

//DS5 DD DSNAME=*.STEP1.DS1,DISP=0LD 

//DS 6 DD DSNAME=* . STEP1 . DS 2 , DI SP= (MOD , CATLG) 




C 
C 
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Location of the Data Set 

The system obtains unit and volume information from the original DD 
statement. The UNIT, VOLUME and LABEL parameters are only needed in the 
following cases: 

1. Use the UNIT parameter if you want more devices allocated to the 
data set than were requested the last time the data set was passed. 

2. Use the LABEL parameter if the data set does not have standard 
labels. 

3. If you are extending a data set and the number of volumes required 
to extend the data set may exceed the number of volumes you 
requested, when you defined the data set, either specify a new 
volume count with the VOLUME parameter or deferred mounting with 
the UNIT parameter. If you specify deferred mounting the system 
will give you a new volume each time you need it. 
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UNIT ; The UNIT parameter should be used only if the passed data set is 
a multivolume data set. The system assigns the same number of devices 
to the data set as it did in a previous step. If you want more devices 
assigned to the data set, code in the unit count subparameter the total 
number of devices needed. If you need an indefinite number of new 
volumes to extend the data set, code the DEFER subparameter. 

The format of the UNIT parameter for passed data sets is : 



'[: 



I UNIT=( Lunit count 



[, DEFER]) 



Replace "unit count" with the number of devices needed for the data set. 
Remember that you should not request more devices than there are 
volumes. Code DEFER if you need an indefinite number of new volumes to 
extend the data set. 

In the following example, a data named S6JUNK is defined in the first 
step. A maximum of five volumes are required for 6SJUNK and they are to 
be mounted in succession on two units. In the second step, you extend 
66 JUNK, but request that four units be used. In the third step, you 
again extend &SJUNK with additional output and request that more volumes 
be assigned to it if necessary. Four units will be used. The data set 



//SAM JOB 

//DATA DD DSNAME=S6JUNK,DISP=(, PASS) ,UNIT= (2314,2) 

// V OLUME=( PRIVATE,,, 5 ),SPACE=(CYL, (20,15)) 

//GET DD DSNAME=*. STEPA. DATA, DISP=(MOD, PASS), UNIT=(, 4) 






VOLUME ; The VOLUME parameter is used only when you want to request 
additional volumes for the data set. You must indicate the new maximum 
number of volumes that can be used. You cannot make specific requests 
for more volumes. (You do not have to request more units just because 
you request more volumes.) The format of the VOLUME parameter for 
passed data sets is; 



| VOLUME= ( , , , volcount ) 

L . 



Replace "volcount" with the maximum number of volumes that can be used 
by the data set. 



< 
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In the following example a data set named 66PART is defined in the first 
step, SSPART will reside on volume BC44 and can use two more volumes. 
In the second step, you extend S&PART with additional output and specify 
that a total of five volumes and three units can be used. 



//JOE JOB 

//ONE EXEC PGM=W 

//DD1 DD DSNAME=£PART, DISP= ( , PASS) , UNIT=2400, 

// VOLUME=(, , ,3,SER=BC44) 



//TWO EXEC PGM=Y 

//DD5 DD DSNAME=*,.0NE.DD1,DISP=(M0D,PASS),UNIT==<,3) 

// VOLUME=(,, t 5) 



LABEL : The LABEL parameter is needed only if the passed data set does 
not have standard labels. You must code the same label type you 
specified when you defined the data set. No other subparameters are 
allowed. The format of the LABEL parameter for passed data sets is: 




c 



Extending 
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| LABEL= ( 



,SUL 
,NL 
,NSL 
,BLP 



Code: 
SUL 

NL 
NSL 



BLP 



if the data set has standard and user labels. 



if the data set has no labels. 



if the data set has nonstandard labels . 



to bypass label processing. 



In the following example, a data set named BANK is defined in the first 
step. BANK has nonstandard labels. BANK is retrieved and passed in the 



//MAC JOB 

V/STEPA EXEC PGM=ZYZ 
//DDAA DD DSNAME=BANK, DISP=(, PASS) ,UNIT=2400,LABEL=(, NSL) 



//STEPB EXEC PGM=WZW 

//DDAB DD DSNAME=*.STEPA.DDAA,DISP=(MOD, PASS), LABEL=(, NSL) 
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Size of the Data Set 



You can use the SPACE parameter to override any secondary quantity 
specified when you created the data set. This new secondary quantity is 
in effect only for the duration of the job step. Note that if you did 
not specify a secondary quantity when you created the data set you 
cannot do so now. You can also use the SPACE parameter to request that 
the data set's unused space be released. 



SPACE ; The format of the SPACE parameter is: 



I (TRK 

II SPACE=(]CYL L (1, secondary quantity), RLSE) 
I (block length [ 

L 



The first positional parameter indicates whether you are requesting 
space in units of tracks (TRK), cyclinders (CYL) , or blocks. If you are 
using blocks, replace "block length" with the average block length of 
your data. You do not have to use the , same type of unit of space you 
used when you created the data set. 

Any primary quantity you code is ignored. However, for reasons of 
syntax you must code some number, such as 1 , as the primary quantity. 

Replace the term "secondary quantity" with the amount of space you 
desire in the units specified. 

Code RLSE if you want the system to delete the data set's unused 
space when the data set is closed. If you requested space in units of 
tracks, any unused tracks are released. If you requested space in units 
of cylinders, any unused cylinders are released. If you requested space 
in units of blocks, any unused tracks or cylinders, whichever the system 
allocated to the data set, are released. If you do not wish to override 
any secondary quantity specified when you created the data set, but do 
want to code RLSE, you must still specify a unit of measurement and a 
primary quantity for reasons of syntax. However, you need not enclose 
the primary quantity in parentheses if you do not code a secondary 
quantity. 



In the following example, you are extending a passed data set named 
S6DRIP that you defined in the first step of your job. &&DRIP requested 
a secondary allocation of two cylinders. When you extend 6&DRIP in the 
second step you want to use a secondary allocation of 300 tracks. This 

//STEP1 EXEC PGM=EAST 

//DSET1 DD DSNAME=S£DRIP,DISP=(,PASS),UNIT=231l», 



//STEP 2 EXEC PGM=WEST 

//DSET11 DD DSNAME=*.STEP1.DSET1,DISP=(M0D,PASS), 

// SPACE=(TRK, (1,300)) 



( 
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Data Attributes 

The DCB parameter is used only if the data set does not have standard 
labels and the DD statement that defined the passed data set contains 
the DCB parameter. 



DCB ; You must specify the DCB parameter in one of two ways: 

1. Copy the DCB parameter exactly as it appeared in the DD statement 
where you defined the passed data set., or 

2. Make a backward reference to the DD statement that defined the data 
set. 

Making a backward reference reduces the possibility of error in copying 
the parameter. 

The format of the DCB parameter for copying the attributes of the 
passed data set is : 



| DCB=(list of attributes) 

L . 




c 
c 
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Code exactly the same DCB subparameters you coded in the DD statement 
where the passed data set is defined. You may not add, change, or 
delete subparameters. For example, if you coded 

DCB= ( BLKS I ZE= 8 , LREC L=8 ) 

DCB=(BLKSIZE=800, LRECL=80) 
The format of the DCB parameter for making a backward reference is: 



| ( * . ddname 

| DCB=j*. stepname. ddname 

| / * . stepname. procstepname. ddname 

L 



Replace "ddname" with the name of the DD statement whose DCB parameter 
you want to copy. Replace " stepname" with the name of the EXEC 
statement of the step that has the earlier DD statement. If the earlier 
DD statement is contained in the same job step, omit the stepname, i.e., 

DCB=*. ddname 



When the earlier DD statement is contained in a cataloged procedure 
step, you must give both the name of the job step that invokes the 
procedure and the procedure step name, i.e., 

DCB=*. stepname. procstepname . ddname 
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The following example shows how to code the DCB parameter to copy the 
DCB parameter of a DD statement in a previous step: 

r ., 

//DD1 DD. . .DISP= (, PASS) ,LABEL=(, NL) , DCB=(BLKSIZE-1600,LRECL=80) 



//STEP4 EXEC... 

//COPY DD . . .DISP= (MOD, PASS) , LABEL= ( , NL) ,DCB=*. STEP2. DD1 



I J 

The following example shows how to code the DCB parameter to copy the 
attributes of a passed data set defined in a cataloged procedure step. 
The first part of the example shows your input deck, the second part 
shows your cataloged procedure called by the P92 EXEC statement in your 



j INPUT DECK 



//P92 EXEC PROOXYZ 



stepname. 
//COPY EXEC... 
//DD1 DD... DISP= (MOD, PASS), LABEL- (, BLP) ,DCB=*. P92.STEP4. DATA 

ddname V^ 



CATALOGED PROCEDURE 



procstepname 




//STEPJ_ EXEC ... 

//DATA DD. . . DISP= ( , PASS) ,LABEL= ( , BLP) , DCB=BUFNO=U 



Special Processing Option 

You can use the DUMMY parameter to bypass operations and data set 
disposition on a sequential data set (magnetic tape or direct access). 



DUMMY ; The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing program asks to extend the dummy 
data set, the write request is recognized, but no data is transmitted. 
This facility is particulary useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
extending of a data set until you are sure your program is going to 
produce meaningful output. The DUMMY parameter is a positional 



< 
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parameter. That means that it must be coded first in the operand field, 
For example: 

If you wish, you can omit all other parameters required to define 
your data set except DCB. (If you were not going to write the DCB 
parameter you do not have to write it.) For example, the two DD 
statements shown above could be coded as follows: 

//INPUT DD DUMMY, DCB=BLKSIZE=500 

When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to extend the 
data set. For example, 

//INPUT DD DSNAME=*.STEP1. DDA, DISP = (MOD, PASS), LABEL=(,NL), 

// DCB=BLKSIZE=500 

//READ DD DSNAME=*. STEP4. ABC, DISP=(MOD, PASS) 



CATALOGED DATA SET 

A cataloged data set is a nontemporary data set defined with the 
DISP=(,CATLG) parameter or cataloged by the IEHPROGM utility program. 
The parameters shown in Table 23 are used to extend a cataloged data 
set. Remember that you can extend any sequential cataloged data set, 
but you can only add members to a partitioned data set. 

This section is summarized in Table 74 of Appendix D. 



Data Set Information 

The DSNAME and DISP parameters are required. DSNAME identifies the data 
set. DISP specifies if you are retrieving or extending the data set. 



DSNAME : The format of the DSNAME parameter is: 




C 
C 
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| DSNAME= ( dsname 

| ( dsnamednembername 

L 



>} 



Replace the term "dsname" with name of the cataloged data set. If the 
name is a fully qualfied name you must give all levels of qualification. 
For example if you created the data set as 

DSNAME=PLUS 

DSNAME=SYST . GLOBE 
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If you are adding a member to a partitioned data set, you must code 
the new member name in parentheses after the data set name. The member 
name consists of one to eight alphameric or national (a,#,$) characters, 
The first character must be a letter or national character . For 



DISP : The format of the DISP parameter is: 

T 



| DISP=(MOD 
I 

I 

L 



", UNCATLG 
, DELETE 
, CATLG 



[; 



UNCATLG 

DELETE 

CATLG 



You must code MOD. Specifying MOD as the first subparameter tells the 
system that when a data set is opened for output, the read/write 
mechanism is to be positioned after the last record in the data set. In 
order to extend a data set, you must have exclusive control and you gain 
exclusive control by specifying MOD. The second positional parameter 
tells the system what is to be done with the data set at the end of the 
job step. If you omit this subparameter the data set remains cataloged. 
If you code UNCATLG the data set will be uncataloged but not deleted. 
The next time you retrieve an uncataloged data set you must follow the 
directions given for "Kept Data Set. " If you code DELETE the data set 
will be deleted. The only time you need to code CATLG is when you are 
extending the data set and the data set may require additional volumes. 
In this case, when you code 



DIS P= ( MOD , CATLG ) 

the system updates the catalog entry to include the new volume serial 
numbers . 

The third positional subparameter tells the system what is to be done 
with the data set if the step ABENDS. You can specify UNCATLG or DELETE 
and, when you are extending the data set, you can specify CATLG. 

Note ; When you are adding a member to a partitioned data set, the 
disposition (UNCATLG, DELETE, or CATLG) you specify applies to the 
entire data set and not to the one member. If you want to delete a 
particular member, you must use the IEHPROGM utility program. 

In the following example, you are extending a cataloged data set 

In the following example, you are adding a member to a cataloged data 



:aloged data set named 



In the following example you are extending a cataloged data set named 
AREA. After extending it you want to uncatalog the data set. 



//DDZ DD DSNAME=AREA,DISP= (MOD, UNCATLG) 
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Location of the Data Set 

The system obtains unit and volume information from the catalog. The 
UNIT, VOLUME, and LABEL parameters are only needed in the following 
cases: 



1. If you need more than one unit for your data set, use the UNIT 
parameter. 

2. If you need additional volumes, either specify a new volume count 
with the VOLUME parameter or deferred mounting with the UNIT 
parameter. If you specify deferred mounting the system will give 
you a new volume each time you need it. 

3. If you want your data set assigned to the same devices assigned to 
an earlier data set in the jobstep, request unit affinity with the 
UNIT parameter. 

4. If you want the volume to be private you should use the VOLUME 
parameter. 

5. If the cataloged data set does not have standard labels, you must 
use the LABEL parameter to specify the label type. 

UNIT : The UNIT parameter should be used only if you need more than one 
unit for your data set or if you want unit affinity. 

Requesting Units : The system assigns one device to your data set. If 
you want more devices assigned, code in the unit count subparameter the 
total number of devices needed. If you need an indefinite number of new 
volumes code the DEFER subparameter. The format of the UNIT parameter 
for cataloged data sets is: 




C 

c 
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j UNIT= < , [unit count! t , DEFER ] ) 



"• 



j 



Replace "unit count" with the number of devices needed for the data set. 
Code P if you want the same number of devices as there are volume serial 
numbers in the catalog entry. 

Code DEFER if you need an indefinite number of new volumes to extend 
the data set. If you code DEFER, code the PRIVATE subparameter in the 
VOLUME parameter. If you do not code DEFER you should code the VOLUME 
parameter to indicate the total number of volumes you need to extend the 
data set. 

In the following example, you are extending a cataloged data set 
named ALPHA. BETA that resides on three volumes. You think two more 
volumes may be needed and indicate this fact with the VOLUME parameter. 
You request one extra device with the UNIT parameter. 

//EXT DD DSNAME=ALPHA. BETA, DISP=M0D, UNIT= ( , 4) , VOLUME= ( , , , 5) 

Using the same example, if you do not know how many extra volumes you 
need, but want the system to mount as many volumes as you need using the 

//EXT DD DSNAME=ALPHA. BETA, DISP=MOD,UNIT= (,4 , DEFER), VOLUME= PRIVATE 
Using the same example, if you want the new volumes cataloged, code: 
//EXT DD DSNAME-ALPHA . BET A , DISP= (MOD , CATLG) , UNIT= ( , 4 , DEFER) , 
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Unit Affinity : To conserve the number of units used in a job step, you 
can request that the cataloged data set be assigned to the same device 
or devices as assigned to an earlier data set in the same step. This 
technique, known as unit affinity, indicates that you want the volumes 
on which the cataloged data set resides and the volumes used by the 
earlier data set to be mounted on the same devices in sequential order. 
Unit affinity implies deferred mounting for one of the volumes since 
both volumes cannot be mounted at the same time. Before you request 
unit affinity, make sure that both data sets use the same type of 
removable volumes, for example, both data sets could be on 2314 voluir.es, 
or both on 2400 volumes. It does not make sense to request unit 
affinity where both data sets are on different types of volumes. 

The format of the UNIT parameter for requesting unit affinity is: 

r * 1 

| UNIT=AFF=ddname | 

L J 

Replace the term "ddname" with the name of an earlier DD statement in 
the job step. Whenever it is required, the volume of the earlier data 
set will be demounted and the cataloged data set will be mounted on the 
same unit. If the ddname refers to a DD statement that defines a dummy 
data set, the data set defined on the DD statement requesting unit 
affinity is assigned a dummy status. 

When unit affinity is requested for two data sets that reside on 
different 2321 volumes, the data sets are assigned the same device but 
can be assigned different bins. If the data sets are assigned different 
bins, the implied deferred mounting is ignored. 

In the following example, the DD statement named DD2 requests that 
the system assign the same number of units to this data set as it 
assigns to the data set defined on the statement named DDL Since CC1 
requests two devices, these two devices are assigned to the data set 

//DD1 DD UNIT=(2400,2),VOLUME=(,,,2) 

VOLUME : The VOLUME parameter is needed only when one or more of the 
following conditions are met: 

1. You want the volume on which the cataloged data set resides to be 
private. A private volume is one that cannot be allocated to a new 
temporary data set that makes a nonspecific request for a public 
Volume . 

2. You want the private volume to remain mounted at the end of the job 
step. 

3. You want to begin processing with a certain volume when you are 
retrieving or extending a multivolume cataloged data set. 

4. You need additional volumes to extend the data set. (You cannot 
request additional volumes for a partitioned data set.) 

The format of the VOLUME parameter for cataloged data sets is: 

r 

| V0LUME= ( [ PRIVATE ] 



[, RETAIN] |, sequence! l*volcount3) | a 

JL- J [ I 
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The PRIVATE subparameter means that you want the volume (s) on which 
the cataloged data set resides to be private. The RETAIN subparameter 
means that the volume will not be demounted at the end of the step. 
PRIVATE must be coded when you code RETAIN. (RETAIN has the same effect 
on volume mounting as coding PASS in the DISP parameter.) Private 
volumes are demounted at the end of the step unless it is an unremovable 
volume, such as a 23 01, or unless it has been designated by your 
installation to be a permanently resident volume, for example, the 
system residence volume. It is recommended that you use the RETAIN 
subparameter whenever you want the volume to remain mounted at the end 
of the step. 



For example if you want the volume that contains the SMITH. JOHN data 

//OLD DD DSNAME-SMITH.JOHN,DISP=MOD,VOLUME=PRIVATE 

Using the same example, if you want the volume to remain mounted at 

//OLD DD DSNAME=SMITH.JOHN,DISP=MOD,VOLUME=(PRIVATE,RETAIN) 

When you are extending a multivolume cataloged data set, you can 
begin processing with other than the first volume of the data set by 
coding the sequence number subparameter. Replace "sequencett" with a 
number from 1 to 255 that indicates the sequence number of the volume 



The sequence number is a positional subparameter and must follow the 
PRIVATE and RETAIN subparameters or the commas that indicate their 
absence. If you omit the sequence number subparameter and the volume 
count subparameter follows, you must indicate its absence by a comma. 

The volume count subparameter is used only when you want to request 
additional volumes for the data set. Replace "volcount" with the 
maximum number of volumes that can be used for the data set. If you 
code "volcount" but do not request the same number of devices in the 
UNIT parameter, you must code the PRIVATE subparameter. 
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In the following example, you are extending a cataloged data set 
named SYSTEM. TWO. SYSTEM. TWO now resides on four volumes and you think 
you may need two more. Only four units are to be used. The new volumes 
are to be cataloged. 

//IN DD DS NAME=SY STEM. TWO, DISP= (MOD, CATLG) ,VOLUME= (PRIVATE,,, 6) 

Using the same example, you want to use one device for each unit. 
(In this case you do not have to code PRIVATE unless you want all six 

// VOLUME= ( PRIVATE, , , 6 ) 

Using the same example, you want to use one device for each unit. 
(In this case you do not have to code PRIVATE unless you want all six 
volumes to be private.) 

//IN DD DSNAME=SYSTEM.TWO,DISP=(MOD,CATLG),UNIT=(,6), 
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Using the same example, if you want to begin processing with the 

LABEL: The LABEL parameter is needed only if the cataloged data set 
does not have standard labels. You must code the same label type you 
specified when you defined the data set. No other subparameters are 
allowed. The format of the LABEL parameter for cataloged data sets is: 

r _. . ., 

I |,SUL | 

| LABEL=(),NL ) j 

I I # NSL | 

| (,BLP) | 

L J 

code: 

SUL 

if the data set has standard and user labels. 

NL 

if the data set has no labels. 

NSL 

if the data set has nonstandard labels. 

BLP 

to bypass label processing. 

In the following example, a cataloged data set named A.B.D is 
//INPUT DD DSNAME=A.B.D,DlSP=MOD,LABEL=(,NSL) 

Size of the Data Set 

You can use the SPACE parameter to override any secondary quantity 
specified when you created the data set. This new secondary quantity is 
in effect only for the duration of the job step. Note that if you did 
not specify a secondary quantity when you created the data set you 
cannot do so now. You can also use the SPACE parameter to request that 
the data set's unused space be released. 

SPACE : The format of the SPACE parameter is: 

[ (TRK » | 

| | SPACE=(JCYL [, (1, secondary quantity) , ELSE) | 

j (block length) | 

i j 

The first positional parameter indicates whether you are requesting 
space in tracks (TRK), cylinders (CYL), or blocks. If you are using 
blocks,, replace "blocklength" with the average block length of your 
data. You do not have to use the same type of unit of space you used 
when you created the data set. 

Any primary quantity you code is ignored. However, for reasons of 
syntax you must code some number, such as 1, as the second positional 
subparameter . 
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Replace the term "secondary quantity' 
desire in the units specified. 



with the amount of space you 



Code RLSE if you want the system to delete the data set's unused 
space when the data set is closed. If you requested space in units of 
tracks, any unused tracks are released. If you requested space in units 
of cylinders, any unused cylinders are released. If you requested space 
in units of blocks, any unused tracks or cylinders, whichever the system 
allocated to the data set, are released. If you do not wish to override 
any secondary quantity specified when you created the data set, but do 
want to code RLSE, you must still specify a unit of measurement and a 
primary quantity for reasons of syntax. However, you need not enclose 
the primary quantity in parentheses if you do not code a secondary 
quantity. 

In the following example you are extending a cataloged data set named 
//DD79 DD DSNAME=COLOR. GREEN. APPLE, DISP=MOD,SPACE=(TRK, (1,50)) 



Data Attributes 

The DCB parameter is needed only if the cataloged data set is on 
magnetic tape and has nonstandard labels or no labels. Follow the 
instructions given for "Magnetic Tape" in the section "Creating A New 
Data Set. " If the data set has standard labels, you can specify the 
subparameters shown in Tables 19, 20, and 22 for "Cataloged Data Sets* 
in the section "Retrieving an Existing Data Set." 
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Special Processing Options 

There are three special processing options for cataloged data sets: 

1. You can request channel separation from other data sets in the same 
job step using either the SEP or the AFF parameter. 

2. You can suppress I/O operations on a sequential data set (magnetic 
tape or direct access) using the DUMMY parameter. 

3. For systems with MVT and TSO, you can defer definition of a data 
set until you need it using the DYNAM parameter. 



SEP ; When two or more data sets are to be used in a job step, 
processing time may be shortened by requesting that the system transmit 
data sets over separate channels. For example, it would be faster to 
have your input data set and your output data set on separate channels 
than to have them on the same channel. 

You can request channel separation for data sets in each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type of different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with the UNIT 
parameter. 
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The format of the SEP parameter is 



| SEP=(ddname, . ..) 

L 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. The earlier DD statements can define 
any type of data set: new or existing, on magnetic tape or direct 
access, temporary or nontemporary, etc. 

In the following example, you request that the data set defined by 
the FOUR DD statements be assigned to a channel other than the ones 
assigned to the data sets defined by the ONE and TWO DD statement. The 
data sets defined by ONE and TWO may or may not be on the same channel. 
The data set defined by THREE may or may not be on the same channel as 



//PROG1 EXEC PGM=PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL=(,NL) 
DSNAME=SYSTEM. USER. ABC, DISP=MOD 
DSNAME=HELP,DISP=(,KEEP),UNIT=2314, 
VOLUME=SER=ALF ,LABEL=RETPD=31 
DSNAME=END,DISP=OLD,UNIT=2400-2, 
VOLUME=SER=TAPE75,SEP=(ONE,TWO) 



//TWO DD 

//THREE DD 

// 

//FOUR DD 

// 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 



//PR0G1 EXEC PGM= PROCESS 

//ONE DD UNIT=2U00,VOLUME=PRIVATE,LABEL=(,NL) 
DSNAME=SYSTEM . USER. ABC, DISP=MOD 
DSNAME=HELP,DISP= ( ,KEEP) ,UNIT=2314 , 
V0LUME=SER=AFL,LABEL=RETPD=31, SEP=TWO 
DSNAME=END,DISP=OLD,UNIT=2400-2, 
VOLUME=SER=TAPE75, SEP =( ONE, TWO) 



//TWO DD 
//THREE DD 
// 
//FOUR DD 

illiflilllil 



As a result of this example, the data sets defined by ONE and TWO may 
or may not be on the same channel. The data set defined by THREE and 
FOUR may or may not be on the same channel, but neither one will be on 
the same channel as the data set defined by TWO. Also, the data set 
defined by FOUR will not be on the same channel as the data set defined 



Remember that the request for channel separation made with the SEP 
parameter is only a suggestion to the system for more efficent- 
operation, and not a requirement. If your data set must be on separate 
channels specify unit addresses with the UNIT parameter. You can obtain 
a configuration chart with all the unit addresses from your manager or 
supervisor. 



AFF: The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same operation using the AFF 
parameter in the later data sets. The AFF parameter tells the system 
that you want the data set defined on this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 



< 
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The format of the AFF parameter is 



| AFF=ddname 

L 



Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separation. This data set and the earlier data set 
may or may not be on the same channel- 

In the following example, the data sets defined by DD1 and DD2 may or 
may not be on the same channel. The data sets defined by DD3 and DD5 
may or may not be on the same channel, but neither one will be on the 
same channel as the data sets defined by DD1, DD2, or DD5. 



//STEP EXEC PGM=METHOD2 
//DD1 DD 



//DD2 
//DD3 
//DDU 
//DDS 



DD 

DD 
DD 
DD 



SEP=(DD1,DD2), . . . 

SEP=DD3,... 

AFF=DD3 f ... 



The requests for channel separation and affinity are only suggestions 
to the system. They will be honored if the appropriate devices are 
available. 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing program asks to extend the dummy 
data set, the write request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
extending of a data set until you are sure your program is going to 
produce meaningful output. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

//IN DD DUMMY,DSNAME=ABLE,DISP=MOD, LABEL=( ,NL) , DCB=BLKSIZE=100 

If you wish, you can omit all other parameters required to define 
your data set except DCB. (If you were not going to write the DCB 
parameter you do not have to write it.) For example, the two DD 

//IN DD DUMMY, DCB=BLKSIZE=100 
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When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve or 
extend the data set. For example, 

//IN DD DSNAME=ABLE, DISP=MOD,LABEL=(,NL),DCB=BLKSIZE=100 
//DDT DD DSNAME=BAKER,DISP=MOD 
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DYNAM ; In TSO LOGON procedures, the DYNAM parameter allows you to 
extend a cataloged data set on a direct access device at some time after 
you have started your terminal session. With the DYNAM parameter, data 
sets are allocated when they are needed and not necessarily at the 
beginning of the job step. 

In the background, the DYNAM parameter has the same meaning as DUMMY. 
Like DUMMY, DYNAM is a positional parameter. However, no other 
parameters may be coded with the DYNAM parameter. 



KEPT DATA SET 

A kept data set is a nontemporary data set defined with the DISP=(,KEEP) 
parameter. The parameters shown in Table 23 are used to retrieve or 
extend a kept data set. Remember that you can extend any sequential 
data set, but you can only add members to a partitioned data set. 

This section is summarized in Table 75 of Appendix D. 



Data Set Information 

The DSNAME and DISP parameters are required. 

DSNAME ; The format of the DSNAME parameter is: 



DSNAME=(dsname 

(dsname (membername 



>} 



Replace the term "dsname" with the name of the kept data set. For 

If you are adding a member to a partitioned data set, you must code 
the new membername in parentheses after the data set name. The member 
name consists of one to eight alphameric or national (&«$.,#) characters, 
The first character must be a letter or national character. For 

DSNAME=NOVA ( STAR1) 



< 



238 JCL User's Guide (Release 20.1) 



DISP: The format of the DISP parameter is: 



DISP= (MOD 



', KEEP 
, CATLG 

, DELETE 



", KEEP 
, CATLG 
, DELETE 



You must code MOD. Specifying MOD as the first subparameter tells 
the system that when the data set is opened for output, the read/write 
mechanism is to be positioned after the last record in the data set. In 
order to extend a data set, you must have exclusive control and you gain 
exclusive control by specifying MOD. 

The second positional subparameter tells the system what is to be 
done with the data set at the end of the job step. If you omit this 
subparameter the data set remains kept. If you code CATLG the data set 
will be cataloged. If you code DELETE the data set is deleted. 

The third positional subparameter tells the system what is to be done 
with the data set if the step ABENDS. If you omit this subparameter the 
data set remains kept. You can specify instead CATLG or DELETE. 

Note: When you are adding members to a partitioned data set, the 
disposition (KEEP, CATLG, or DELETE) you specify applies to the entire 
data set. If you want to delete a particular member, you must use the 
IEHPROGM utility program. 

In the following example you are extending a kept data set named 
FRANK. FRANK resides on a 2400 volume named ABCXYZ. 
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//AB DD DSNAME=FILE(MEM12),DISP=(M0D,CATLG),UNIT=2311, 
// VOLUME=SER=PACK70 



Location of the Data Set 

The UNIT and VOLUME parameters are required. The LABEL parameter is 
required only if the data set does not have standard labels or if it is 
not the first data set on a tape volume. 

UNIT : You can use the UNIT parameter to directly specify units for your 
data set or to request the same units used for an earlier data set in 
the job step (unit affinity) . 

Requesting Units : The format of the UNIT parameter for directly 
specifying units for your data set is : 



mnit address 
UNIT=(j device type 
(group name 



ir,unit count"] 
l: p J 



[, DEFER]) 



The first positional subparameter identifies the tape drive or direct 
access device you want to use for your data set by its address, or unit 
name, or group name. 
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unit address 

is the actual machine address of the direct access device. 



For 



You should not specify the address unless you are sure you want it, 
Do not specify an address if you are going to need more than one 
unit for the data set. (Multiple units are requested with the 
second subparameter of the UNIT parameter.) 

device type 

Corresponds to the type of device. Coding a device type provides 
you with a certain degree of device independence in that your data 
set may be placed in any number of devices of the same type. For 

your data set uses any 2311 Disk Storage Drive. The following 
device types can be specified. 

Device Type Description 

2301 2301 Drum Storage Unit 

2302 2302 Disk Storage Drive 

2303 2303 Drum Storage Unit 

2305-1 2305 Fixed Head Storage Facility Model 1 

2305-2 2305 Fixed Head Storage Facility Model 2 

2311 Any 2311 Disk Storage Drive 

2314 2314 Storage Facility 

2319* 2319 Disk Storage Facility 

2321 Any bin mounted on a 2321 data cell device 

2400 2400 series Nine-Track Magnetic Tape Drive that can 
be allocated to a data set written or to be written 
in 800 bpi density when the dual density feature is 
not installed on the drive, or in 1600 bpi when the 
dual-density feature is installed in the drive. 

2400-1 2400 series Magnetic Tape Drive with Seven-Track 
Compatibility and without Data Conversion. 

2400-2 2400 series Magnetic Tape Drive with Seven-Track 
Compatibility and Data Conversion. 

2400-3 2400 series Nine-Track Magnetic Tape Drive that can 
be allocated to a data set written or to be written 
in 1600 bpi density. 

2400-4 2400 series Nine-Track Magnetic Tape Drive having an 
800 and 1600 bpi capability. 

| 3330 3330 Disk Storage Drive 

| x To indicate the 2319 in the UNIT parameter, specify UNIT=2314. 

However, to designate the 2319 as the particular device for your 
I data set, specify UNIT=unit address. 



< 
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groupname 

is the name of a collection of devices, selected by your 
installation during system generation. For example^ ^youir^'.lV^:"-^"/; ,"-v- 
installation might select the name TAPE for aii/^ajpje^^^ 
configuration. If you do not care which tape drive ^a^Viise^Vf or ; - v; ; ; 
your data set, you would then code 

UNIT=TAPE 

Your manager or supervisor should tell you which group names were 
generated for your installation. 

The second positional subparameter is used only if your data set 
occupies more than one volume and if you want more than one of these 
volumes to be mounted at the same time. This subparameter indicates how 
many drives are to be used for mounting your data set's volumes. 

unit count 

indicates how many units you want assigned to the data set. You 
can specify a maximum of 59 units per DD statement. Make sure that 
your system has at least the number of units you specify. 
Otherwise an error will result. If you specify fewer units than 
there are volumes in your data set, only the same number of volumes 
as there are units can be mounted at the same time. (If you 
request fewer units than volumes code the PRIVATE subparameter in 
the VOLUME parameter.) If you specify the same number of units as 
there are volumes, all volumes can be mounted at the same time. 
(If you are extending your data set and you think your data set may 
use more volumes than you expect, you should indicate the maximum 
number of volumes that can be used with the volume count 
subparameter of the VOLUME parameter. Do not request any more 
units than the maximum number of volumes you specify.) For 
example, if you code 

your data set will be assigned two 2301 drum storage units. 

P 

specifies parallel mounting. When you request parallel mounting 
the system counts the number of serial numbers specified with the 
VOLUME parameter, you also indicate a maximum number of volumes 
that can be used by the data set, the number of units assigned is 
the number of serial volumes you specify and not the larger maximum 
number of volumes that can be used. 

DEFER is the third positional subparameter. DEFER requests the 
system to assign the required tape drives or direct access devices to 
the data set and to defer the mounting of the volume or volumes until 
the processing program attempts to open the data set. Operating 
efficiency may decrease if you specify DEFER for a tape data set. If 
DEFER is coded for a tape data set, the system issues a mount message to 
the operator when the processing program attempts to use the data set 
and then waits until the volume is mounted. If you do not code DEFER, 
the mount message is issued when the device is assigned and there is no 
waiting for the operator. By the time your program tries to use the 
data set, it is very likely that the operator has already mounted the 
volume and that the system will not have to wait for him. DEFER has a 
special use if you think you may need additional volumes to extend your 
data set. If you specify DEFER the system will give you a new volume 
each time you need it. If you code DEFER, code the PRIVATE subparameter 
in the VOLUME parameter. If you do not code DEFER, you should code the 
VOLUME parameter to indicate the total number of volumes you need to 
extend the data set. 
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Unit Affinity : To conserve the number of units used in a job step, you 
can request that the kept data set be assigned to the same device or 
devices as assigned to an earlier data set in the same step. This 
technique, known as unit affinity, indicates that you want the volumes 
on which the kept data set resides and the volumes used by the earlier 
data set to be mounted on the same devices in sequential order. Unit 
affinity implies deferred mounting for one of the volumes since both 
volumes cannot be mounted at the same time. Before you request unit 
affinity, make sure that both data sets use the same type of removable 
volumes; for example, both data sets could be on 2314 volumes, or both 
on 2400 volumes. It does not make sense to request unit affinity where 
both data sets are on different types of volumes. 

The format of the UNIT parameter for requesting unit affinity is: 

r ■ 1 

| UNIT=AFF=ddname | 

L : . J 

Replace the term "ddname" with the name of an earlier DD statement in 
the job step. Whenever it is required, the volume. of the earlier data 
set will be mounted and the cataloged data set will be mounted on the 
same unit. If the ddname refers to a DD statement that defines a dummy 
data set, the data set defined on the DD statement requesting unit 
affinity is assigned a dummy status. 

When unit affinity is requested for two data sets that reside on 
different 2321 volumes, the data sets are assigned the same device but 
can be assigned different bins. If the data sets are assigned different 
bins, the implied deferred mounting is ignored. 

In the following example, the DD statement named DD2 requests that 
the system assign the same number of units to this data set as it 
assigned to the data set defined on the statement named DDL since DD1 
requests two devices, these two devices are assigned to the data set 



VOLUME : The format of the VOLUME parameter for kept data sets is: 

r -• ■ ' 

j VOLUME= ( [ PRIVATE ] L RETAIN] [ , , vole ount , ] SER= ( seria 1 , . . . ) ) 



D 



J 



The PRIVATE subparameter means that you want the volume (s) on which the 

kept data set resides to be private. (A private volume is one that 

cannot be allocated to a new temporary data set that makes a nonspecific 

request for a public volume. ) The RETAIN subparameter means that the 

volume will not de demounted at the end of the step. PRIVATE must be 

coded when you code RETAIN. (RETAIN has the same effect on volume 

mounting as coding PASS in the DISP parameter.) Private volumes are 

demounted at the end of the step unless it is an unrecoverable volume, 

such as a 2301, or unless it has been designated by your installation to 

be a permanently resident volume, for example, the system residence 

volume. It is recommended that you use the RETAIN subparameter whenever 

you want the volume to remain mounted at the end of the step. If there ^ 

are more volumes than devices, only the last volumes mounted 1 

simultaneously are retained. ^ 



242 JCL User's Guide (Release 20.1) 



The volume count subparameter is used only when you want to request 
additional volumes for the data set. (You cannot request additional 
volumes for a partitioned data set.) Replace the term "volcount" with 
the maximum number of volumes the data set can use. You should only use 
this subparameter if you think your data set may use more volumes than 
those named in the SER subparameter. Note that "volcount" is the 
maximum number of volumes that can be used and not additional volumes. 
For example, if you name three volumes in the SER subparameter, but you 
think you may need two more volumes, replace "volcount" with 5. Ask the 
operator for the serial numbers of the volumes assigned, because you 
will have to know them the next time you retrieve or extend your data 
set. 



The SER subparameter identifies the serial numbers of the volumes on 
which your data set resides. Replace the term "serial" with the l-to-6 
character serial number associated with the volume. The volume serial 
number can contain any alphameric and national characters and the 
hyphen. If it is necessary to include special characters, other than a 
hyphen, in the volume serial number, enclose it in apostrophes, for 

V0LUME=SER=(54AB2, '6/10/8 • ) 

If only one volume is involved you need not code the parentheses, for 
example: 
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VOL=SER=ABCDEF 



In the following example you extend a kept data set named A99 that 
resides on volumes AA22 and AB45. Only one tape drive named TAPE will 
be used and the last volume used is to remain mounted at the end of the 



//DD9 DD DSNAME=A99, DISP=MOD,UNIT=TAPE, 

// VOLUME=(PRIVATE,RETAIN,SER=(AA22,AB45)V 



In the following example, you extend the same data set, A99, but 

//DD99 DD DSNAME=A99,DISP=M0D,UNIT=(TAPE,P), 

// VOLUME= (PRIVATE, RETAIN, SER=( AA22, AB45) ) 

In the following example you are extending a kept data set named 
PARTS. PARTS resides on two 2311 volumes named 7945 and. 7946. Only one 
device is used, so you have to code PRIVATE. 

//P4 DD DSNAME-PARTS,DISP=M0D,UNIT=2311, 

Using the same example, if you think you may need one more volume to 
extend the data set, code: 



//P4 DD DSNAME=PART,DISP=MOD,UNIT=2311, 

// V0LUME= (PRIVATE, , , 3, SER=( 7945, 7946) ) 
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In the following example you are extending a kept data set named 
WHOLE. WHOLE resides on three 2314 volumes named 12345, 12346, and 
12347. Three 2314 units are used. 

//P5 DD DSNAME=WHOLE, DISP=MOD,UNIT=( 2314,3) , 

Using the same example, if you need an indefinite number of volumes 
to extend the data set you should code DEFER. You must also code 
PRIVATE because you are not increasing the number of devices. 

// VOLUME= (PRIVATE, SER=(12345, 12346, 12347)) 

In the case of multivolume data sets, give only the serial numbers of 
the volumes you want to process in the order you want to process them. 
For example, you want to extend a kept data set named LIST. LIST 
resides on two 2314 volumes named 231410 and 231411. You want to 
process 231411 only. 

//D9 DD DSNAME=LIST,DISP=MOD, 

Using the same example, you need one more volume to extend the data 
set and request volume 231412. Only one device is used, so you have to 

//D9 DD DSNAME=LIST,DISP=MOD,UNIT=2314, 

// VOLUME= (PRIVATE, SER= (231411, 231412)) 



LABEL ; The LABEL parameter is used only if the kept data set does not 
have standard labels, or if the data set is not the first data set on a 
tape volume. 

The format of the LABEL parameter for kept data sets is: 



| LABEL= ( [sequence*] 




The first positional subparameter indicates the order of your data set 
on the tape volume. You only have to specify a sequence number if your 
data set is not the first data set on the volume. If you do not specify 
a sequence number and there are other data sets on the volume, your data 
set cannot be retrieved and the step will abnormally terminate. Replace 
the term "sequence*" with the sequence number of your data set. For 
example, if your data set is the third data set on the volume, code: 



Note : If you request the system to bypass label processing (specify BLP 
in the second positional subparameter of the LABEL parameter) , the 
system treats anything within tape marks as a data set. Therefore, if 
you want your data set to be written in the proper sequence, you must 
include all header and trailer labels and data sets that precede your 
data set in the sequence number subparameter. 



i 
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The second positional subparameter indicates the label type of your 
data set. 

Code: 

SUL 

if the data set has standard and user labels. 

is the data set has no labels. 

if the data set has nonstandard labels. 



NL 



NSL 



BLP 



to bypass label processing. 



In the following example, a kept data set named BLUE is extending 
BLUE as the fourth data set on a tape volume named TAPE2. The data set 
has standard labels. 

//T77 DD DSNAME=BLUE,DISP=MOD,UNIT-2400, 
// VOLUME=SER=TAPE2 , LABELS 

Using the same example, if the data set has no labels, code: 

// V0LUME-SER=TAPE2,LABEL=U,NL) 

In the following example you extend a kept data set named RED that 
has nonstandard labels. RED resides on a tape volume named 47922A. 

//INPUT DD DSNAME=RED,DISP=MOD,UNIT=2400, 
// VOLUME=SER=47922A,LABEL=(,NSL) 
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Size of the Data Set 

You can use the SPACE parameter to override any secondary quantity 
specified when you created the data set. This new secondary quantity is 
in effect only for the duration of the job step. Note that if you did 
not specify a secondary quantity when you created the data set you 
cannot do so now. You can also use the SPACE parameter to request that 
the data set's unused space be released. 



SPACE : The format of the SPACE parameter is: 



1 


(TRK i 




1 


SPACE=(jCYL [ 


, (1, secondary quantity) ,RLSE) 


1 


(block length) 




L_. 







The first positional parameter indicates whether you are requesting 
space in tracks (TRK), cylinders (CYL), or blocks. If you are using 
blocks, replace "blocklength" with the average block length of your 
data. You do not have to use the same type of unit of space you used 
when you created the data set. 
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Any primary quantity you code is ignored. However, for reasons of 
syntax you must code some number, such as 1, as the second positional 
parameter. 

Replace the term "secondary quantity" with the amount of space you 
desire in the units specified. 

Code RISE if you want the system to delete the data set's unused 
space when the data set is closed. If you requested space in units of 
tracks, any unused tracks are released. If you requested space in units 
of cylinders, any unused cylinders are released. If you requested space 
in units of blocks, any unused tracks or cylinders, whichever the system 
allocated to the data set, are released. If you do not wish to override 
any secondary quantity specif ied when you created the data set, but do 
want to code RLSE, you must still specify a unit of measurement and a 
primary quantity for reasons of syntax. However, you need not enclose 
the primary quantity in parentheses if you do not code a secondary 
quantity. 

In the following example you are extending a kept data set named BAG. 
BAG has a secondary allocation of 3 cylinders. You want to use a 
secondary allocation of 5 1024-byte blocks for the duration of the job 

//EXT DD DSNAME=BAG,DISP=MOD,UNIT=2311,VOLUME=SER==MMM942, 
// SPACE=(1024, (1,5)) 



Data Attributes 

The DCB parameter is needed only if the kept set is on magnetic tape and 
has no labels or nonstandard labels. Follow the instructions given for 
"Magnetic Tape" in the section "Creating a New Data Set." If the data 
set has standard labels, you can specify the subparameters shown in 
Tables 19, 20, and 22 for "Cataloged Data Sets" in the section on 
"Retrieving an Existing Data Set. " 



Special Processing Options 

There are three special processing options for kept data sets: 

1. You can request channel separation from other data sets on the same 
job step using either the SEP or AFF parameter. 

2. You can suppress I/O operations on a sequential data set (magnetic 
tape or direct access) using the DUMMY parameter. 

3. For systems with MVT and TSO, you can defer definition of a data 
set until you need it using the DYNAM parameter. 



SEP : When two or more data sets are to be used in a job step, 

processing time may be shortened by requesting that the system transmit 

data sets over separate channels. For example, it would be faster to A 

have your input data set on separate channels than to have them on the % 

same channel. 
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You can request channel separation for the data sets of each job step 
using the SEP parameter. If possible, the system will honor this 
request. It may not always be possible to honor the request for 
separation because given devices may not be available for allocation 
when the job step is executed or because there may not be enough devices 
of a given type on different channels for all the data sets that request 
separation. If channel separation is not requested, the system will 
assign any available channel that has the device specified with the UNIT 
parameter. 

The format of the SEP parameter is: 



j SEP=(ddname,. ..) 

L 



Replace the terms "ddname" with the names of up to eight earlier DD 
statements in the same job step. The earlier DD statements can define 
any type of data set: new or existing, on magnetic tape or direct 
access, temporary or nontemporary , etc. 



In the following example, you request that the data set defined by 
the FOUR DD statements be assigned to a channel other than the ones 
assigned to the data sets defined by the ONE and TWO DD statement. The 
data sets defined by ONE and TWO may or may not be on the same channel. 
The data set defined by THREE may or may not be on the same channel as 
any of the other three data sets. 



//PR0G1 EXEC PGM=PROCESS 

//ONE DD UNIT=2400,VOLUME=PRIVATE,LABEL=(,NL) 
DSNAME=SYSTEM. USER. ABC, DISP=MOD 
DSNAME=HELP,DISP= ( ,KEEP) , UNIT=2314, 
VOLUME=SER=AF L , LABEL=RETPD=31 
DSNAME=END,DISP=OLD,UNIT=2U00-2, 
VOLUME=SER=TAPE75 , SEP= (ONE, TWO) 



//TWO DD 
//THREE DD 
// 

//FOUR 
// 



DD 



Using the preceding example, if you want to request that the data set 
defined by the THREE DD statement be on a channel other than the one 
assigned to the data set defined by the TWO DD statement code: 




C 
C 



Extending 



Kept 
Data Set 



//PR0G1 EXEC PGM=PROCESS 



//ONE DD 
//TWO DD 
//THREE DD 
// 
//FOUR DD 

L . 



UNIT=2400,VOLUME=PRIVATE J LABEL= (,NL) 
DSNAME=SYSTEM. USER. ABC, DISP=MOD 
DSNAME=HELP,DISP= ( ,KEEP) ,UNIT=231U , 
VOLUME=SER=AFL , LABEL=RETPD= 31 , SEP=TWO 
DSNAME=END,DISP=OLD,UNIT=2400-2, 
VOLUME=SER=TAPE7 5 , SEP= ( ONE, TWO) 



—J 



As a result of this example, the data sets defined by ONE and TWO may or 
may not be on the same channel. The data set defined by THREE and POUR 
may or may not be on the same channel, but neither one will be on the 
same channel as the data set defined by TWO. Also, the data set defined 
by FOUR will not be on the same channel as the data set defined by ONE. 

Remember that the request for channel separation made with the SEP 
parameter is only a suggestion for more efficient operation, and not a 
requirement. If your data set must be on separate channels specify unit 
addresses with the UNIT parameter. You can obtain a configuration chart 
with all the unit addresses from your manager or supervisor. 
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AFF: The AFF parameter provides a shortcut method of requesting channel 
separation. When two or more data sets in the same job step have the 
same channel separation requirements, you can code the SEP parameter for 
the first data set, and then request the same separation using the AFF 
parameter in the later data sets. The AFF parameter tells the system 
that you want the data set defined on this DD statement to have the same 
channel separation as the data set defined in the named DD statement. 

The format of the AFF parameter is: 

i 1 

J AFF=ddname | 

L J 

Replace "ddname" with the name of the earlier DD statement that requests 
the desired channel separation. This data set and the earlier data set 
may or may not be on the same channel. 

In the following example, the data sets defined by DD1 and DD2 may or 
may not be on the same channel. The data sets defined by DD3 and DD5 
may or may not be on the same channel, but neither one will be on the 
same channel as the data sets defined by DD1 and DD2. The data set 

by DD3, but it may be on the same channel as the data sets defined by 



r 

| //STEP 


EXEC 


PGM=METHOD2 


j //DD1 


DD 


Ipilpii!^^ 


| //DD2 


DD 


^8i^pi^B|l^fcrtli^^irtlii 


j //DD3 


DD 


SEP=(DD1, DD2), ... 


| //DDU 


DD 


SEP=DD3, . . . 


j //DD5 


DD 


AFF=DD3,... 



The requests for channel separation and affinity are only suggestions to 
the system. They will be honored if the appropriate devices are 
available. 



DUMMY : The DUMMY parameter allows you to bypass I/O operations and data 
set disposition. When your processing programs asks to extend the dummy 
data set, the write request is recognized, but no data is transmitted. 
This facility is particularly useful when you are debugging your program 
because it saves you processing time. For example, you can suppress the 
extending of a data set until you are sure your program is going to 
produce meaningful output. 

The DUMMY parameter is a positional parameter. That means that it 
must be coded first in the operand field. For example: 

// VOLUME=SER-7942,LABEL=(,NSL),DCB=DEN«2 
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If you wish, you can omit all other parameters required to define your 
data set except DCB. (If you were not going to write the DCB parameter 
you do not have to write it.) For example, the two DD statements shown 

//P79 DD DUMMY 



When you are ready to perform I/O operations on your data set, simply 
omit the DUMMY parameter and code all parameters required to retrieve or 
extend the data set. For example: 



DYNAM: In TSO LOGON procedures, the DYNAM parameter allows you to 
extend a kept data set on a direct access device at some time after you 
have started your terminal session. With the DYNAM parameter, data sets 
are allocated when they are needed and not necessarily at the beginning 
of the job step. 




C 
C 



Extending 



Kept 
Data Set 



In the background, the DYNAM parameter has the same meaning as DUMMY. 
Like DUMMY, DYNAM is a positional parameter. However, no other 
parameters may be coded with the DYNAM parameter. 
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Special DD Statements 

You can use the DD statement facilities to define three types of special 
data sets. They are: 

1. Private libraries 

• JOBLIB DD Statement 

• STEPLIB DD Statement 

2. Data Sets for abnormal termination dumps 

• SYSABEND DD Statement 

• SYSUDUMP DD Statement 

3. Checkpoint data set 

• SYSCHK DD Statement 



PRIVATE LIBRARIES 

The most frequently used processing programs reside in the system 
library SYS1.LINKLIB. However, you may want to place a program in a 
private library for one of several reasons: 

• It is used infrequently. 

• It is not completely checked out. 

• It is used only by a limited number of people. 

• You wish to transport it from one location to another. 

To retrieve a program from a private library, the library must be 
made available. You do this by defining a private library for the 
entire job or for a particular job step, using one of two special DD 
statements. The JOBLIB DD statement is used to define a private library 
for the entire job and the STEPLIB DD statement is used to define a 
library for a job step. When the operating system encounters one of 
these statements, it effectively concatenates the private library with 
the system library for the duration of the job or job step. When a 
request is made for a program the system searches for the program, first 
in the private library, and then in the system library. 

Note : Private libraries are partitioned data sets. Each member of the 
library is a program. (See the description of the PGM parameter in the 
section "The EXEC Statement.") 



JOBLIB DD Statement 

The JOBLIB DD statement defines a private library for the duration of a 
job. The parameters you code on the DD statement depend on whether the 
library exists or whether you are creating it in the same job. In 
either case you must follow these rules : 

1. The ddname must be JOBLIB. Never use the ddname JOBLIB except when 
you are defining a private library, 

2. The JOBLIB DD statement must appear immediately after the JOB 
statement to which it pertains. 

3 . A JOBLIB DD statement cannot appear in a cataloged procedure. 
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The Library Exists ; The private library can exist as a cataloged data 
set or as a kept data set. If it is a cataloged data set you must use 
the DSNAME and DISP parameters in the JOBLIB DD statement. If it is a 
kept data set, you must use the DSNAME, DISP, UNIT, and VOLUME 
parameters. The DSNAME, UNIT, and VOLUME parameters are coded as 
described for "Cataloged Data Sets" and "Kept Data Sets" in the section 
"Retrieving an Existing Data Set." The format of the DISP parameter is: 



PIS p=Uold K PASS ) 
(SHR/ 



You must code either OLD or SHR. OLD means that the library already 
exists and that you are requesting exclusive control of it for the 
duration of your job. In order to modify the library, you must have 
exclusive control. SHR means that the library already exists and that 
it may be used by other jobs that are executing concurrently. PASS 
means that the library is kept at the end of the job. You can omit PASS 
if you wish. No other subparameters are allowed. 

If you wish to refer to the private library in a later DD statement, 
you can code 




C 

c 



Special 
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Libraries 



DSNAME=* .JOBLIB 



and the DISP parameter, 
|~,PASS "I 

disp=((old\ ,keep ) 
\shr/|_#catlgJ 



(Do not assign a disposition of DELETE, because the library would then 
be deleted at the end of the job step and be unavailable for use during 
the remainder of the job.) If a later DD statement defines a data set 
that is to be placed on the same volume as the private library, you can 
code 

VOLUME=REF=* .JOBLIB 
to obtain volume and unit information. 

In the following example, the private library defined in the JOBLIB 
DD statement is cataloged. The CHECK DD statement refers to the private 



//ATWL JOB 

//JOBLIB DD DSNAME=SYSTEM.LIBU. DAILY, DISP=OLD 

//FIRST EXEC PGM=NUM7 



//SECOND EXEC PGM=NUM9 

//CHECK DD DSNAME=*. JOBLIB, DISP= (OLD, PASS) 



The DD Statement 251 



In the following example, the private library defined in the JOBLIB 
DD statement is not cataloged. The UPDT DD statement refers to the 
private library and catalogs it. This means that the next time you use 
the private library in another job you only have to use the DSNAME and 
DISP parameters in its JOBLIB DD statement. 



//ALL JOB 
//JOBLIB DD 

//STEPl 
//UPDT 



// 



DSNAME=PRIV.LIB12, DISP=SHR, UNIT=2301, 

VOLUME=SER=AB24 97 
EXEC PGM=ONE 
DD DSNAME=*. JOBLIB, DISP=(SHR,CATLG) , 

VOLUME=REF=* . JOBLIB 



//STEP2 EXEC PGM=FOUR 



You can concatenate other libraries to the one defined in the JOBLIB DD 
statement. That is, you can arrange a sequence of DD statements that 
define different libraries. The libraries are searched in the order in 
which the DD statements appear. If the system library is not defined on 
one of these DD statements, it is searched last. 

To concatenate libraries, omit the ddname from all the DD statements 
defining the libraries except the first DD statement. The first DD 
statement must specify a ddname of JOBLIB, and the entire group must 
appear immediately after the JOB statement. 

In the following example, several private libraries are concatenated. 
LIBS. LETTERS. ABC, SERIES2 . GR0UP5, PROGRAMS, before searching SYSl. LINKLIB. 



//CHECKUP JOB 
//JOBLIB DD 
// DD 
// DD 



DSNAME=LIBS . LETTERS . ABC, DISP=OLD 
DSNAME=SERIES2.GROUP5 ,DISP=OLD 
DSNAME=PROGRAMS,DlSP=OLD, UNIT= ( 231U, 2) 
VOLUME=SER=<231407,231408) 



Creating the JOBLIB : You can create a private library and use it in the 
same job. Code the JOBLIB DD statement to create the library and add 
members to the library by coding DD statements in the job steps. You 
must be sure that all programs you want to execute exist in your private 
library or in SYSl. LINKLIB before you try to execute them. 



< 
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The UNIT, SPACE, and DISP parameters are required on the JOBLIB DD 
statement. The UNIT parameter specifies the device to be allocated to 
the library. The SPACE parameter specifies how much space you want 
allocated for the data set on that device. The format of the DISP 
parameter is : 



DISP=( NEW 



[JPASS 1 ) 
,catlgJ 



Specifying NEW indicates that you are creating the library and 
requesting exclusive control of it for the duration of the job. PASS 
indicates that the library is to be deleted at the end of the job; CATLG 
indicates that the library is to be cataloged. If you specify a 
disposition of CATLG, the DSNAME is also required. The DSNAME parameter 
specifies the name of the private library. In addition, you can code 
other parameters used to create a partitioned data set. (See the 
section on "Direct Access Devices" under "Creating a Data Set.") 

On a DD statement that adds a member to the library, you must code 
the DISP parameter and specify a status of OLD. You also code the other 
parameters required to add a member to a partitioned data set. (See the 
section on "Extending an Existing Data Set.") 




C 

c 
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The following example illustrates how to create and use a private 
library in the same job. The private library, created in the JOBLIB DD 
statement, is named SEVEN. HILLS. OHIO and is to be cataloged. The DD 

both CRILE and TEACHER are added to the library before they are 
executed. DUNDEE, the program called in STEP1, is found in 
SYS1.LINKLIB. 



//TON I JOB 

//JOBLIB DD 

// 

//STEP1 

//NEW 



DSNAME=SEVEN . HILLS. OHIO, DISP= (NEW, CATLG) , 

UNIT=231U,SPACE=(TRK, (20,2,2)) 
EXEC PGM= DUNDEE 
DD DSNAME=SEVEN. HILLS. OHIO (CRILE) , DISP= (OLD, CATLG) 



//STEP 2 EXEC PGM=CRILE 

//MORE DD DSNAME=S EVEN. HILLS. OHIO ( TEACHER ),DISP=( OLD, CATLG) 



V/STEP3 EXEC PGM=TEACHER 



STEPLIB DD Statement 

The STEPLIB DD statement defines a private library to be used in a job 
step. If you include a STEPLIB DD statement in a job step, the system 
first looks in the private library for the program the job step uses; if 
the program is not there, the system looks in SYS1.LINKLIB. 



The DD Statement 253 



If both JOBLIB and STEPLIB DD statements appear in a job, the STEPLIB 
definition has precedence, i.e., the private library defined by the 
JOBLIB DD statement is not searched for the step that contains the 
STEPLIB definition. If you want the JOBLIB definition ignored but the 
step does not require use of another private library, define the system 
library on the STEPLIB DD statement: 

//STEPLIB DD DSNAME=SYS1.LINKLIB,DISP=0LD 

The private library must exist before the step is executed. The 
parameters you use in the STEPLIB DD statement depend on whether the 
library is cataloged, kept, or passed from a previous job step. In any 
case, you must follow these rules: 

1. The ddname must be STEPLIB. Never use the ddname STEPLIB except 
when you are defining a private library. 

2. A STEPLIB DD statement can appear in any position among the DD 
statements for the step. 

3. The library defined on a STEPLIB DD statement can be referred to by 
or passed to later job steps in the same job. 

4. A STEPLIB DD statement can appear in a cataloged procedure. 

5. You may concatenate private libraries. 

The Library is Cataloged : If the private library is cataloged you must 
code the DSNAME and DISP parameters as described for "Cataloged Data 
Sets" in the section "Retrieving An Existing Data Set." 

• The DSNAME parameter specifies the name of the private library. 

• The DISP parameter specifies the library's status, either OLD or 
SHR, and its disposition. The disposition would be KEEP, UNCATLG, 
DELETE, or PASS, depending on how you want the library treated after 
its use in the job step. 



The following example shows a job with three steps. The UPDT program 
used in STEP1 could reside in the PRIV.LIB2 cataloged private library or 
in SYS1.LINKLIB. The CRTW program used in STEP2 resides in 
SYS1.LINKLIB. During STEP2, a private library named PRIV.LIB3 is 
created and cataloged. The first member, MEMB1, of this library is also 



//AJOB JOB 

//STEP1 EXEC PGM=UPDT 

//STEPLIB DD DSNAME=PRIV.LIB2,DISP=SHR 



//NEW DD DSNAME =PRIV. LI B3(MEMB1) ,DISP= ( ,CATLG) , 



//STEP3 EXEC PGM=MEMB1 

//STEPLIB DD DSNAME=PRIV.LIB3,DISP=0LD 



< 
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The Library is Kept ; If the private library is kept, you must use the 
DSNAME, DISP, UNIT, and VOLUME parameter as described in "Kept Data 
Sets" in the section "Retrieving An Existing Data Set". 

• The DSNAME parameter specifies the name of the private library. 

• The DISP parameter specifies the library's status, either OLD or 
SHR, and its disposition. The disposition would be KEEP, CATLG, 
DELETE, or PASS depending on how you want the library treated after 
its use in the job step. 



• The VOLUME parameter identifies the volume serial number. 

• The UNIT parameter specifies the device to be allocated to the 
library. 

used in STEP1 can reside in the INST.SERIES2 library (defined with the 
JOBLIB DD statement) or in SYSl.LINKLIB. The DIV program used in STEP2 
can reside in the USER.PLIB private library or in SYSl.LINKLIB. 
USER.PLIB is a kept data set but is cataloged in STEP2. The SUBT 
program used in STEP3 resides in SYSl.LINKLIB since the JOBLIB 
definition is ignored and the library defined in the STEPLIB DD 
statement is SYSl.LINKLIB. The ADD program used in STEPU can reside in 
the USER.PLIB or in SYSl.LINKLIB. USER.PLIB is now cataloged and only 
the DSNAME and DISP parameters are needed in the DD statement. The 
MATRIX program used in STEP5 can reside in the INST.SERIES2 library or 
in SYSl.LINKLIB. 




C 
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//JONAS JOB 

//JOBLIB DD DSNAME=INST. SERIES 2, DISP=SHR 

//STEP1 EXEC PGM=MULT 



//STEP2 EXEC PGM=DIV 

//STEPLIB DD DSNAME=USER.PLIB,DISP=( OLD, CATLG) ,UNIT=2314, 

// VOLUME=SER=LIBVOL 



//STEP3 EXEC PGM=SUBT 

//STEPLIB DD DSNAME=SYS1.LINKLIB,DISP=SHR 



//STEP 4 EXEC PGM=ADD 

//STEPLIB DD DSNAME=USER.PLIB,DISP=OLD 



//STEP5 EXEC PGM=MATRIX 
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The Library is Passed : A library can be passed in two ways: 

1. You create the library with the DISP= (NEW, PASS) parameter in one 
job step and you then retrieve it in the STEPLIB DD statement of a 
later job step, or 



You retrieve a cataloged or 
statement of a job step and 
DISP=(SHR,PASS) parameter, 
library then retrieve it as 
cataloged or kept data set. 
first time you retrieve the 
library is not demounted at 



kept private library in the STEPLIB DD 
use a DISP= (OLD, PASS) or 
Any other steps that use that private 
a passed data set and not as a 

(If you use the PASS subparameter the 
library, the volume that contains the 
the end of the step. 



If the private library is passed you must use the DSNAME and DISP 
parameters as described for "Passed Data Sets" in the section 
"Retrieving an Existing Data Set." 

• The DSNAME parameter specifies either the name of the private 
library or a backward reference of the form *. stepname.ddname. If 
the DD statement that assigned a disposition of PASS occurs in a 
cataloged procedure, the backward reference must include the 
procedure step name, i.e., 

* . stepname . procstepname . ddname 

• The DISP parameter specifies a status of OLD or SHR and a 
disposition. The disposition would be KEEP, CATLG, UNCATLG, DELETE, 
or PASS depending on how you want the library treated after its use 
in the job step. 

The following example shows a job with four steps. The ABA program 

library named PRIVATE. LIB. PRIVATE. LIB is passed to other steps. The 
BAPA program used in STEP3 resides in MYLIB. MYLIB is cataloged at the 
end of the job step. The CHI program used in the STEP 4 resides in 
PRIVATE. LIB. 



//RV JOB 

//BUILD DD DSNAME=MYLIB(BAPA),DISP=( , PASS ) ,UNIT=2 302 , 
// V0LUME=SER=BVB111,SPACE=(TRK, (96, ,10)) 



V/STEP2 EXEC PGM=AB0 
//STEPLIB DD DSNAME =PRIVATE. LIB, DISP=( OLD, PASS) 



//STEP 3 EXEC PGM=BAPA 

//STEPLIB DD DSNAME=*.STEP1. BUILD, DISP=( OLD, CATLG) 



//STEPU EXEC PGM=CHI 
| //STEPLIB DD DSNAME=*. STEP2. STEPLIB, DISP=OLD 



i 
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DATA SETS FOR ABNORMAL TERMINATION DUMPS 



Job steps subject to abnormal termination can take advantage of the 
operating system abnormal termination dumping facilities. To avail a 
job step of these facilities, you must include a special DD statement 
defining a data set on which the dump can be written. This DD statement 
must be identified by one of the special ddnames SYSABEND or SYSUDUMP 
and must include appropriate parameters for a new data set on a unit 
record device (printer), a system output device, magnetic tape or a 
sequential data set on a direct access device as described in the 
section "Creating a New Data Set. " The processing program must not make 
a reference to such a data set. If more than one SYSABEND or SYSUDUMP 
DD statement is included in a job step, all but the first SYSABEND or 
SYSUDUMP DD statement are ignored. 

The dump provided when the SYSABEND DD statement is used includes the 
system nucleus, the problem program storage area, and a trace table, if 
the trace table option was requested at system generation (PCP and MFT 
only). The SYSUDUMP DD statement provides only a dump of the problem 
program storage area. 

If you define a data set on printer or a system output device, the 
dump data set is produced immediately. If you define a data set on 
magnetic tape or direct access, you are actually storing the dump so you 
can write it at a later time . When you store the dump you must give a 
conditional disposition of KEEP or CATLG in the DISP parameter. This is 
because the conditional disposition is used only when the job abnormally 
terminates and the dump is produced only when the job abnormally 
terminates . 




C 
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In the following example, the SYSABEND DD statement specifies that 
you want the dump routed through output class D. The dump is to be 
stored temporarily on 15 tracks of a 2314 volume. If you omit the UNIT 
and SPACE parameters, the system assigns you a default unit and 
allocation. 

on the same data set. In both steps a conditional disposition of KEEP 
is specified. This allows storing of the dump if either step abnormally 
terminates. If both steps are successfully executed, the data set is 
deleted in the second step. 



//STEP1 EXEC PGM=ONE 

//SYSUDUMP DD DSNAME=DUMP, DISP= (, PASS , KEEP) ,UNIT=2400 , 

// VOLUME=SER=179 24 



V/STEP2 EXEC PGM=TWO 
//SYSUDUMP DD DSNAME=*. STE PI. SYSUDUMP, DISP= (MOD, DELETE, KEEP) 
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In the following example, STEP1 specifies the dump is to be stored if 
the step abnormally terminates. Because COND=ONLY is specified in 
STEP2, the step is executed only if STEP1 abnormally terminates. STEP2 
uses a program that prints the dump. 



m 



//STEPl EXEC PGM=PLOP 

//SYSUDUMP DD DSNAME=DUMP, DISP=( , DELETE, KEEP) , 

// UNIT=2314,VOLUME=SER=24935,SPACE=(TRK, (20,10)) 



//STEP2 EXEC PGM=PRINT,COND=ONLY 

//INPUT DD DSNAME=DUMP,DISP= (OLD, DELETE), 

// VOLUME=REF=*. STEPl. SYSUDUMP 



Note : For further information on abnormal termination dumps, refer to 
the publication, IBM System/360 Operating System: Programmer's Guide to 
Debugging , GC28-6670. 



CHECKPOINT DATA SET 

If CHKPT macro instructions were executed during the original execution 
of your processing program, checkpoint entries were written on a 
checkpoint data set. If you resubmit your job for restart, and 
execution is to be restarted at a particular checkpoint, you must 
include a DD statement named SYSCHK. The SYSCHK DD statement defines 
the data set on which the checkpoint entry was written. The parameters 
you code on the SYSCHK DD statement depend on whether the data set was 
cataloged or kept. In either case, you must follow these rules: 

1. The ddname must be SYSCHK. SYSCHK can be used as the ddname of DD 
statements in jobs . 

2. The SYSCHK DD statement must immediately precede the first EXEC 
statement of the resubmitted job when restart is to begin at a 
checkpoint. 

(Do not use the SYSCHK DD statement when restart is to begin at a 
step.) 

3. The SYSCHK DD statement must follow a DD statement named JOBLIB, if 
one is present. 

4. The RESTART parameter must be coded on the JOB statement; 
otherwise, the SYSCHK DD statement has no effect. 

5. The parameters you code on the SYSCHK DD statement are determined 
by whether the checkpoint data set is cataloged. 

The Checkpoint Data Set is Cataloged 

If the checkpoint data set is cataloged, you must always code the DSNAME 
and DISP parameters. 

• The DSNAME parameter specifies the name of the checkpoint data set. 
If the checkpoint data set is partitioned, do not include a member 
name in the DSNAME parameter. 

• The DISP parameter must specify or imply a status OLD and 
disposition of KEEP. 
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Other parameters you might code are VOLUME, UNIT, LABEL, and DCB. 

• If the checkpoint entry exists on a tape volume other than the first 
volume of the checkpoint data set, you must indicate this by coding 
the volume serial number or volume sequence number in the VOLUME 
parameter (the serial number of the volume on which a checkpoint 
entry was written). If you code the volume serial number,, you must 
also code the UNIT parameter, since the system will not look in the 
catalog for unit information. 

• Code the LABEL parameter if the checkpoint data set does not have 
standard labels. 

• Code DCB=TRTCH=C if the checkpoint data set is on 7-track magnetic 
tape with nonstandard labels or no labels. 

In the following example the checkpoint data set is cataloged and 
follows the JOBLIB DD statement. 

//JOBLIB DD DSNAME=PRIV.LIB7,DISP=SHR V 

//SYSCHK DD DSNAME=CHECK,DISP= (OLD, KEEP) 




//STEP1 EXEC .7/ ~ ' ' /Checkpoint 

V Data Set 



In the following example, the checkpoint entry resides on the third 
tape volume of the checkpoint data set. The volumes have nonstandard 

//RERUN JOB RESTART=(STEP3,POINT6) 

//STEP1 EXEC . . . 



The Checkpoint Data Set is Kept 

• The DSNAME parameter specifies the name of the checkpoint data set. 
If the checkpoint data set is partitioned, do not include a member 
name in the DSNAME parameter. 

• The DISP parameter must specify or imply a status of OLD and 
disposition of KEEP. 

• The VOLUME parameter specifies the volume serial number of the 
volume on which the checkpoint entry resides. (The serial number of 
the volume on which a checkpoint entry was written is contained in 
the console message printed after the checkpoint entry is written.) 

• The UNIT parameter specifies the device to be allocated to the data 
set. 

Other parameters you might code are LABEL and DCB. 

• Code the LABEL parameter if the checkpoint data set does not have 
standard labels,. 

• Code DCB=TRTCH=C if the checkpoint data set is on 7-track magnetic 
tape with nonstandard or no labels. 
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In the following example the checkpoint data set is kept and has no 

//TRY JOB RESTART=(STEP4,STOP2) 
//SYSCHK DD DSNAME=CHK,DlSP=OLD, UNIT=2400, 
// VOLUME=SER=AB927,LABEL=(,NL) 



Specifying the Time Sharing Option (TSO) 

The TERM parameter which is coded on a DD statement indicates to the 
system that the input or output data being defined is coming from or 
going to a time sharing terminal. The TERM parameter is ignored under 
batch processing and under any system configuration other than MVT with 
the Time Sharing Option (TSO) . 

The format of the TERM parameter is 

i 1 

j TERM=TS | 

L , J 

TS is the only value that can be specified for TERM- If any other value 
is specified, a JCL error message is produced. 

Except for the DCB parameter, all other parameters ( including DUMMY 
and DYNAM) coded on a DD statement with TERM are ignored. For example, 
the following three DD statements are equivalent in effect: 

//DD1 DD TERM=TS 

//DD2 DD UNIT=2400,DISP=(MOD,PASS),TERM=TS,LABEL=(,NL) 
I //DD3 DD DUMMY, TERM=TS 

In the following example, the DCB parameter would be merged as usual 

//DD3 DD UNIT=2<400,DISP= (MOD, PASS) ,DCB= (RECFM=FB, 
// LRECL=80,BLKSIZE=80),TERM=TS,LABEL=(,NL) 

A DD statement with TERM=TS can only be concatenated if it is the 
last DD statement. You can refer to the Job Control Language Reference , 
GC28-670U, for information on concatenating data sets. 



Postponing Definition of a Data Set 

The DDNAME parameter allows you to postpone defining a data set until 
later in the same job step. In the case of cataloged procedures, this 
parameter allows you to postpone defining a data set in the procedure 
until the procedure is called by a job step. 

The DDNAME parameter is most often used in cataloged procedures and 
in job steps that call procedures. It is used in cataloged procedures 
to postpone defining data in. the input stream until a job step calls the 
procedure. (Procedures cannot contain DD statements that define data in 
the input stream, i.e., DD * or DD DATA statements.) It is used in job 
steps that call procedures to postpone defining data in the input stream 
on an overriding DD statement until the last overriding DD statement for 
a procedure step. (Overriding DD statements must appear in the same 
order as the corresponding DD statements in the procedure.) 
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The format of the DDNAME parameter is 



DDNAME=ddname 



Replace the term "ddname" with the name of a following DD statement in 
the same job step that defines this data set. 



The following rules apply to the DDNAME parameter: 

1. If you want to make a backward reference (i.e., *. ddname), you must 
refer to the statement that contains the DDNAME parameter, not to 
the statement that has the matching ddname. If the backward 
reference occurs before a statement with the matching ddname is 

encountered, it refers to a dummy data set. 

2. If you want to concatenate data sets, the unnamed DD statements 
must follow the statement that contains the DDNAME parameter; they 
must not follow the statement that has the matching ddname. 

3. You can use the DDNAME parameter up to five times in a job step and 
up to five times in a cataloged procedure step; however, each use 
must refer to a different ddname. 








Postponing 



4. You cannot use the DDNAME parameter in a JOBLIB DD statement. 

5. You cannot use the DDNAME parameter to refer to a DD statement that 
has the DYNAM parameter coded on it. 

6. A DD statement to which a DDNAME parameter refers cannot contain 
any reference to a DD statement that follows the one with the 
DDNAME parameter. 



Two DCB subparameters can be coded with the DDNAME parameter — 
BLKSIZE and BUFNO. (You cannot use a backward reference to a 
previously- defined DD statement to obtain these DCB subparameters; they 
must be coded explicitly on the DD statement that contains the DDNAME 
parameter.) This allows you to assign these DCB characteristics to the 
data set defined in the referenced DD statement. When the DCB 
subparameters BLKSIZE and BUFNO are coded both on the DD statement that 
contains the DDNAME parameter and on the referenced DD statement, the 
subparameters coded on the former are ignored. 



BLKSIZE and BUFNO would most often be coded with the DDNAME parameter 
when the referenced DD statement defines data in the input stream. Data 
in the input stream for MFT and MVT is written onto a direct access 
device, and the records are blocked as they are written. The input 
reader procedure normally assigns a block size and number of buffers for 
blocking. Coding the BLKSIZE subparameter allows you to specify that 
you want shorter blocks. Coding the BUFNO subparameter allows you to 
specify that you want fewer buffers. You cannot specify that you want 
larger blocks or more buffers than would be assigned by the input reader 
procedure. (When a job is submitted via remote job entry and the BUFNO 
subparameter is coded, the BUFNO subparameter is ignored.) 
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in a cataloged procedure named BETTY. The second part of the example is 
your input deck- In your input deck you define DD1 as a data set in the 



CATALOGED PROCEDURE STEP 



//ABC 
//DD1 
//DD2 



EXEC PGM=PROGB 

DD DDNAME=INPUT 

DD UNIT=2311,SPACE=(TRK, 10) 



INPUT DECK 



//STEP3 EXEC PROC=BETTY 

//ABC. INPUT DD * 



input data 



/*! 



L_. 



for the LATER DD statement. The COPY DD statement in STEP2 makes a 
backward reference to this data set. 



//STEP1 EXEC PGM=HELEN 

//LATER DD DDNAME=NOW 

//OTHER DD UNIT=1442 

//ELSE DD DSNAME=MY.DATA,DISP=OLD 

//NOW DD DSNAME=&6FILE,DISP=(,PASS),UNIT=2311, 

// SPACE=(CYL,10) 

//STEP 2 EXEC PGM=PARIS 

//COPY DD DSNAME=*. STEP1. LATER, DISP=( OLD, DELETE) 



In the following example, the STREAM DD statement defines the data 

parameter is used to block the input data. The two data sets named 
B.B.B and DATA are concatenated with the data set in the input stream. 



//DEF DD DDNAME=STREAM,DCB=(BLKSIZE=1600,BUFNO=2) 

// DD DSNAME=DATA,DISP=OLD,UNIT=2400,VOLUME=SER=17942 



//STREAM DD 



input data 



/* 



( 
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The first part of the following example shows a procedure step named 

example is your input deck. In your input deck you use the DDNAME 
parameter to override the DD1 DD statement and make it refer to a data 
set in the input stream. You also override the DD2 DD statement. 



, f „ r ^ T — ; — ^-^^.-^ — .*. r ~^ ..^ — . — ,_ — . . ... n 

| //SETUP EXEC PGM=CLOUD j 

| //REFER ExIc~PR0C=ARG0i | 

:l— .■„ : J 




c 



Postponing 
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The Delimiter Statement 



When you submit data through an input stream, you must indicate to the 
system the beginning of the data and the end of the data. The beginning 
of the data is indicated by a DD * or DD DATA statement. The end of the 
data set is indicated by a delimiter statement. The delimiter 
statement, however, is not required if the data is preceded by a DD * 
statement. For further information on the use of the delimiter 
statement refer to "Input Stream" in the section "Retrieving an Existing 
Data Set. " 

The delimiter statement consists of the characters /* in columns 1 
and 2 and the comments field. 

The format of the delimiter statement is: 

i 1 

| /* comments | 

L . J 

The comments cannot be continued onto another statement. 

The following example shows an input deck with an input stream data 

//STEP1 EXEC PGM=ONE 



( 
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The Null Statement 



The null statement can be placed at the end of a job's JCL statements 
and data or at the end of all the statements in an input stream. The 
null statement tells the system that the job just read should be placed 
on the queue of jobs ready for processing. If there are any JCL 
statements or data between a null statement and the next JOB statement, 
these are flushed by the system. 

If you do not follow your job's JCL statements and data with a null 
statement, the system places your job on the queue when it encounters 
another JOB statement in the input stream. If your job is the last job 
in the input stream and a null statement does not follow it, the system 
recognizes that this is the last job in the input stream and it places 
your job on the queue. 

Although it is not technically necessary to use a null statement at 
the end of your job it is good practice to do so because it ensures 
against other people's mistakes. For example, if the programmer who 
wrote the job that is to run after yours forgot to include his JOB 
statement, all of his JCL statements are considered to be part of your 
job. If you include the null statement at the end of your job, your job 
will end where it is supposed to and you will not have to pay for the 
other programmer's mistake. 



Delimiter 



If a null statement follows a control statement that is being 
continued, the system treats the null statement as a blank comment field 
and assumes that the control statement contains no other operands. 

The null statement consists only of the characters // in columns 1 
and 2. The remainder of the statement must be blank. 




The format of the null statement is: 



I // 



The following example illustrates the use of the null statement. 



//MY JB JOB , • C BROWN ' , MSG LEVEL= (1,1) 

//STEP1 EXEC PROC=FIELD 

//DD1 DD UNIT=2400 

//DD2 DD * 



input data 



/* 
// 
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The Comment Statement 



The comment statement can be used to contain information that may be 
helpful to yourself or another person that may be running your job or 
reviewing your output listing. 

The comment statement may appear anywhere except before the JOB 
statement. A comment statement cannot be continued, but if you have 
many comments to write you can use several comment statements. 

The comment statement consists of the characters //* in columns 1, 2, 
and 3, and the comments field. 



The format of the comment statement is : 



| //* comments 

l 



In the MSGLEVEL parameter, you can request an output listing of all 
the JCL statements processed in your job. If you do, you can identify 
comment statements by the appearance of ♦♦♦ in columns 1, 2, and 3. 

The following example illustrates the use of the comments statement 
in your input deck . 



//DEPT58 JOB 

//♦FOR INFORMATION ON THIS JOB, CONSULT PROGRAM 

//♦FILE NUMBER 73492 (OCTOBER 30, 1969) 

//STEPl EXEC PGM=ONE 

//♦STEP1-WRITTEN BY JOHN DOE 



//STEP2 EXEC PGM=TWO 

//♦STEP 2- WRITTEN BY HELEN JONES AND GUS SMITH 



//♦END OF JOB-ERRORS SHOULD BE REPORTED TO CHARLIE 
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The PROC Statement 



The PROC statement is the first control statement in an in- stream 
procedure. Optionally, the PROC statement can also be the first control 
statement in a cataloged procedure. If a PROC statement is included in 
a cataloged procedure, it is used to assign default values for symbolic 
parameters in the procedure. In an in-stream procedure, the PROC 
statement is used to mark the beginning of the procedure and can be used 
to assign default values to symbolic parameters in the procedure. A 
default value appearing on a PROC statement can be overridden by 
assigning a value to the same symbolic parameter on the EXEC statement 
that calls the procedure. 

The name field of the PROC statement is optional for cataloged 
procedures only. The PROC statement must contain the term PROC in its 
operation field. For cataloged procedures, the operand field must 
contain symbolic parameters and their default values. For in-stream 
procedures, the operand field is optional. 

The PROC statement and symbolic parameters are explained in detail in 
Part IV of this publication. 



Naming the PROC Statement 



The name field is optional for cataloged procedures only. The name 
field is required for in-stream procedures. When a name is coded, it 
must be from one to eight characters in length and can contain any 
alphameric or national (a, $, #,) character. However, the first 
character of the name must be a letter or national character and must 
begin in column 3. 

The name that appears on the PROC statement of an in-stream procedure 
is the name of the procedure. It is this name that is used on an EXEC 
statement to call the procedure. For cataloged procedures, the name of 
the PROC statement does not have to be the name of the cataloged 
procedure although the same name may be used. The name of the cataloged 
procedure is the name of the member of SYS1.PR0CLIB that contains the 
cataloged procedure. 



Comment 




Symbolic Parameters 



To assign a value on a PROC statement to a symbolic parameter, code: 



j symbolic parameter =value 

L 



Omit the ampersand that precedes the symbolic parameter in the 
procedure. 
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You can also nullify a symbolic parameter on the PROC statement. 
Code: 



| symbolic parameter= 

i 



Omit the ampersand that precedes the symbolic parameter and do not 
follow the equal sign with a value. 

There are some rules you should keep in mind as you assign values to 
symbolic parameters: 

1. The value you assign can be any length, but it cannot be continued 
onto another statement. 

2. If the value contains special character, enclose the value in 
apostrophes (the enclosing apostrophes are not considered part of 
the value). If the special characters include apostrophes, each 
must be shown as two consecutive apostrophes. 

3. If you assign more than one value to a symbolic parameter on the 
PROC statement, the first value encountered is assigned. 

4. If the symbolic parameter is concatenated with some other 
information (e.g., &JOBN0.321), this information and the value you 
assign to the symbolic parameter cannot exceed a combined total of 
120 characters. 

In the following example, you are writing a cataloged procedure that 
has four symbolic parameters: SSET, STAPE, &SERIAL, and SCLASS. Values 
are assigned to the symbolic parameters on the PROC statement. These 
values are used when the procedure is called and the values are not 
assigned to the symbolic parameters by the programmer. 



//EXTEND PROC SET= DAILY, TAP E=2U 00, 

//LOOKUP EXEC PGM=SEARCH 

//DD1 DD DSNAME=MASTER.6SET,DISP=OLD 

//DD2 DD DSNAME==TABLE,UNIT=6TAPE, VOLUME=SER=SSERIAL, 

// DISP=(,PASS) 

//PRINT EXEC PGM=POST 

//DD1 DD DSNAME=*. LOOKUP. DD2,DISP=( OLD, DELETE) 

//DD2 DD SYSOUT=SCLASS 



< 
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The PEND Statement 



A PEND (procedure end) statement is required for every in-stream 
procedure you include in the input stream. It is used to mark the end 
of the procedure. The name of the PEND statement is optional. 

The PEND statement consists of the characters // in columns 1 and 2, 
and three fields — the name field, the operation (PEND) field, and the 
comments field. If comments are coded, one or more blanks must separate 
the operation field from the comment field. The PEND statement cannot 
be continued. 



The format of the PEND statement is: 



r 

| //name PEND comments 

L 



The following examples show the PEND statements 



r 

| //ENDPROC PEND THIS STATEMENT IS REQUIRED 



uU 



This PEND statement contains a comment; therefore, a blank is required 
to separate the operation field (PEND) from the comments field. 



| // PEND 

L . 



A PEND statement can contain only the coded operation field preceded by 
// and one or more blanks. 
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The Command Statement 



Commands are issued to communicate with and control the system. All 
commands may be issued to the system via the operator's console; some 
commands may be also issued via a command statement in the input stream. 
In most cases, the operator issues the command. If you include a 
command statement as part of your JCL statements, the command is usually 
executed as soon as it is read. Since this is so, in MFT and MVT it is 
not likely that the command will be synchronized with the execution of 
the job step to which it pertains. Therefore, you should tell the 
operator which commands you want issued and when they should be issued, 
and let him issue them. 

A command statement may appear immediately before a JOB statement, an 
EXEC statement, a null statement, another command statement, or between 
DD statements. 

The command statement consists of characters // in columns 1 and 2, 
and three fields — the operation (command) , operand, and comments 
field. The format of the command statement is: 

r ■ 1 

| // command operand comments | 

L . . ; ._ J 



The commands that can be entered through the input stream MFT or MVT 
are listed below, with a brief explanation of what each command requests 
the system to do. Most command statements consist of an operation 
(command) field and an operand field, which includes options associated 
with the command. The operand field is not described here; a complete 
discussion of the commands and operands is presented in the publication 
IBM System/360 Operating System: Operator's Guide . 



MFT 

In MFT, the following commands can be entered through the input stream. 

CANCEL : The CANCEL command tells the system to immediately terminate 
the scheduling or execution of a job, to cancel a job on the queue, or 
to stop the writing of an output data set currently being processed by 
an output writer. 

DISPLAY : The DISPLAY command causes a console display of certain system 
status information. 

HOLD : The HOLD command causes the system to temporarily prevent one job 
or all jobs from being selected for processing. 

LOG : The LOG command is used to enter information into the system log. 

MODIFY : The MODIFY command tells the system to change the 
characteristics of a functioning output writer. 

MOUNT : The MOUNT command tells the system to assign a device so a 
particular volume can be mounted on it. This device can then be 
assigned by the system to any job step that requires that volume. 
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RELEASE : The RELEASE command tells the system to resume job selection, 
which had been suspended by the HOLD command or TYPRUN=HOLD on the JOB 
statement. 

REPLY ; The REPLY command is used to reply to messages from the system 
or from a processing program that requests information. 

RESET : The RESET command tells the system to change the class or 
priority, or both, of a job in an input, hold, or system output queue. 

SET ; The SET command is used to establish the values of certain 
variables, such as the time of day and the date. 

START ; The START command tells the system to start a particular system 
process, e.g., an input reader, graphic job processor, initiator, etc. 

STOP ; The STOP command tells the system to stop a system process that 
has been previously started by a START command, or to stop the console 
display affected by the DISPLAY command. 

UNLOAD; The UNLOAD command tells the system to remove the volume 
previously mounted in response to a MOUNT command. 

VARY : The VARY command tells the system to place an I/O device or path 
into an online or offline status. 

WRITELOG: The WRITELOG command tells the system to have the system 
output writer write out the contents of the system log. 



Command 
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MVT 

In MVT, the following commands can be entered through the input stream. 

CANCEL : The CANCEL command tells the system to immediately terminate 
the scheduling or execution of a job, to cancel a job on the queue, or 
to stop the writing of an output data set currently being processed by 
an output writer. 

DISPLAY ; The DISPLAY command causes a console display of certain system 
status information . 

HOLD : The HOLD command causes the system to temporarily prevent one job 
or all jobs from being selected for processing. 

LOG : The LOG command is used to enter information into the system log. 

MODIFY : The MODIFY command tells the system to change the 
characteristics of a functioning initiator or output writer. 

MOUNT : The MOUNT command tells the system to assign a device so a 
particular volume can be mounted on it. This device can then be 
assigned by the system to any job step that requires that volume. 

RELEASE : The RELEASE command tells the system to resume job selection, 
which had been suspended by the HOLD command or TYPRUN=HOLD on the JOB 
statement. 

REPLY : The REPLY command is used to reply to messages from the system 
or from a processing program that requests information. 

RESET : The RESET command tells the system to change the class, or 
priority, or both, of a job in an input, hold, or system output queue. 

SET : The SET command is used to establish the values of certain 
variables, such as the time of day and the date. 

START : The START command tells the system to start a particular system 
process, e.g, an input reader, graphic job processor, initiator, etc. 

STOP : The STOP command tells the system to stop a system process that 
had been previously started by a START command or to stop the console 
display effected by the DISPLAY command. 

UNLOAD : The UNLOAD command tells the system to remove the volume 
previously mounted in response to a MOUNT command. 

VARY : The VARY command tells the system to place an I/O device or path 
into an online or offline status. In a system with Model 65 
Multiprocessing (M65MP) , this command is used to place I/O devices, CPU, 
channel, and storage units in online or offline status. 

WRITELOG : The WRITELOG command tells the system to have the system 
output writer write out the contents of the system log. 



< 
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Part III: JCL for Compilers, Linkage Editors, 
and Loader 



Part III shows the JCL statements needed to compile and link edit or 
load your source program using the following IBM processing programs: 

ALGOL (Tables 24 , 25 and 26) 

Assembler E (Tables 27, 28, and 29) 

Assembler F (Tables 30, 31, and 32) 

COBOL E (Tables 33, 34, and 35) 

COBOL F (Tables 36, 37, and 38) 

American National Standard COBOL (Tables 39, 40, and 41) 

FORTRAN E (Tables 4 2, 43, and 44) 

FORTRAN G (Tables 45, 46, and 47) 

FORTRAN H (Tables 48, 49, and 50) 

PL/I F (Tables 51, 52, and 53) 

Linkage editor (Tables 54, 55, and 56) 

Loader (Tables 57, 58, and 59) 

There are three tables for each processing program. The first table 
shows the input deck. The second table shows the values that can be 
given to the PARM field of the EXEC statement. The third table shows 
how to code each DD statement in the input deck. 

These tables are a summary of the information in the Programmer's 
Guide associated with each of the listed programs. They are presented 
here for your convenience in preparing a few sample decks while learning 
JCL.. For further details and up-to-date information you should refer to 
the appropriate publication. 

The JCL statements required to execute your program can only be 
determined by you. You should code them following the instructions in 
Part II of this publication. 

A section with examples follows the tables. 



Part III 
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ALGOL 



Table 24. ALGOL - Input Deck 



| ALGOL 

f 

//jobname 

//[name] 

//SYSUT1 

//SYSUT2 

//SYSUT3 

//SYSABEND 

//SYSPRINT 

//SYS PUNCH 

//SYSLIN 

//SYS IN 



JOB parameters 

EXEC PGM=ALGOL t , PARM=par amet er s ] 

DD parameters 

DD parameters 

DD parameters 

DD parameters 

DD parameters 

DD parameters 

DD parameters 

DD * or parameters 



Required 
Required 
Required 
Required 
Optional 
Required 
Required 
Required 
Required 



I PROGRAM ) 
(PROCEDURE/ 

h- 



The source program is an ALGOL program. 
The source program is an ALGOL procedure. 



Table 25. 


ALGOL - 


- PARM Field of EXEC Statement 


r 

| PARM 

f- 


T "" 

1 
— I" 


Meaning 



(short) 

(LONG / 



Internal representation of real values is in fullwords. 
Internal representation of real values is in 
doublewords . 



DECK 
NODECK 



The object module is placed on the device specified in 
the SYSPUNCH DD statement. 

The object module is not placed in the device specified 
by the SYSPUNCH DD statement. 



LOAD 
INOLOAD 



The object module is placed on the device specified by 
the SYSLIN DD statement. 

The object module is not placed on the device specified 
by the SYSLIN DD statement. 



H 



SOURCE 
NOSOURCE 



-+- 



A source program and identifier table listing is 

produced. 

The listing is not produced. 



EBCDIC 
ISO ! 



The source program is keypunched in the EBCDIC character 

set. 

The source program is keypunched in the standard 

character set defined by the International Standards 

Organization (ISO). 



/TEST ) 
INOTEST/ 



The object module is to contain testing information. 
The object module will not contain testing information. 



SIZE=number 



Specifies the size of main storage, in bytes, that is 
available to the compiler. 



H 



Note : Underscore the default values selected by your installation 
during system generation. 



i 
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Table 26. ALGOL - DD Statements 



t T 

Special 

Processing 

Options 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Comments 



SYSUT1 
SYSUT2 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



You can request 

separation 

(SEP) 



Work data sets. 



-H 



SYSUT3 



Temporary. You can 
omit DSNAME and 
DISP. 



Direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 



Omit. 



Omit. 



Work data sets. 



1 

Optional . Abnormal 
termination dump 
is produced on 
this data set. 
Code as described 
for "Abnormal Ter- 
mination Dump" in 
the section 
"Special DD 
Statements. " 



SYSABEND 



System output de- 
vice, printer or 
intermediate stor- 
age. SYSOUT=A is 
usually specified. 



1 I 



SYSPRINT 



I- + 

SYSPUNCH 



System output de- 
vice, printer or 
intermediate stor- 
age. SYSOUT=A is 
usually specified. 



You can 
specify 
BLKSIZE. 



Listings are pro- 
duced on this data 
set. 



System output de- 
vice, card punch, 
or intermediate 
storage. SYSOUT=B 
is usually speci- 
fied. 



You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing the 
program. 



Object module is 
produced on this 
data set. (Copied 
from SYSLIN.) 



SYSLIN 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job use 

DSNAME= S Sdsname 
and disp=(,pass). 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing the 
program. 



Object module is 
produced on this 
data set. 



Part III 



, 

Input to the ALGOL | 
compiler (source j 
statements) . | 

j 



SYSIN 



Usually in the 
input stream; use 
* . 



You can 
specify 
BLKSIZE. 
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Assembler E 



Table 27. Assembler E - Input Deck 



j Assembler E 
| 



//job name JOB 
//[name] EXEC 
//SYS LIB DD 
//SYSUT1 DD 
//SYSUT2 DD 
//SYSUT3 DD 
//SYSPRINT DD 
//SYS PUNCH DD 
| //SYSIN DD 
L 



parameters 

PGM=IETASM £ , PARM=parameter s] 

DSNAME=SYS1.MACLIB, DISP=SHR 

parameters 

parameters 

parameters 

parameters 

parameters 

* or parameters 



Required 
Optional 
Required 
Required 
Required 
Optional 
Optional 
Required 



Table 28. 



Assembler E - PARM Field of EXEC Statement 

_ T ' 



j PARM= 



Meaning 



DECK 
NODECK 



The object module is placed on the device specified by 

the SYSPUNCH DD statement. 

An object module is not produced. 



H 



LOAD , 
'NOLO AD 



The object module is placed on the device specified in 

the SYSPUNCH DD statement. 

An object module is not produced. 



(LIST \ 
(NOLIST/ 



An assembler listing is produced. 

An assembler listing is not produced. 



TEST j 
NOTEST 



The object module (if produced) contains the source sym- 
bol table required by TESTRAN. 

The object module does not contain the table required by 
TESTRAN . 



I 

fXREF ) 

(NOXREF/ 



A cross-reference table of symbols is listed. 
A cross-reference table is not produced. 



LINECNT=nn 



Specifies as a number from 01 to 99, the number of lines 
to be printed between headings in the listing. 



Note : Underscore the default values selected by your installation 
during system generation. 



j 



< 
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Table 29. Assembler E - DD Statements 



ddname 



SYSLIB 



Data Set 
Information 



Code 

DSNAME=SYSl. MACLIB 
and DISP=SHR or 
DSNAME=us erl ibr ary 
Alternatively, the 
user library may 
be concatenated to 
SYS1. MACLIB. 



Location of the 
Data Set 



+— - 



Omit. 



Size 

of the 

Data Set 



Omit. 



Data 
Attributes 



Omit. 



Special 

Processing 

Options 



Omit. 



Comments 



Optional. Existing 
partitioned data 
set. 



SYSUT1 
SYSUT2 
SYSUT3 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



You can request 

separation 

(SEP). 



Work data sets. 



-+ 



SYSPRINT 



System output de- 
vice, printer, or 
intermediate stor- 
age. SYSOUT=A is 
usually specified. 



Optional. Listings 
are produced on 
this data set. 



SYSPUNCH 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use DSNAME= 
fiSdsname and DISP= 
(,PASS). If it is 
to be link edited 
or loaded in 
another job, de- 
fine a cataloged 
or kept data set. 
Omit DSNAME and 
DISP to produce a 
punched deck. 



System output de- 
vice, card punch, 
magnetic tape or 
direct access. 
SYSOUT=B can be 
used. If you do 
not use SYSOUT, 
code UNIT; you can 
omit VOLUME and 
LABEL. 



Required 
if on 
direct 
access. 



You can use 
DUMMY while 
testing the 
program. 



Optional. Object 
module is produced 
on this data set. 



H 



SYS IN 



Usually in the 
input stream; use 
*. 



Input to the 
assembler (source 
statements) . 
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Assembler F 



Table 30. Assembler F - Input deck 



j Assembler F 



//jobname JOB 
//[name] EXEC 
//SYSLIB DD 
//SYSUT1 DD 
//SYSUT2 DD 
//SYSUT3 DD 
//SYSPRINT DD 
//SYS PUNCH DD 
//SYSGO DD 
//SYS IN DD 



parameters 

PGM=IEUASM [ , PARM=parameters] 

DSNAME=SYS1.MACLIB, DISP=SHR 

parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

* or parameters 



Required 
Optional 
Required 
Required 
Required 
Optional 
Optional 
Optional 
Required 



Table 31. Assembler F - PARM Field of EXEC Statement 

I T 



PARM= 



f- 



Meanxng 



DECK 
1 NODECK 



| The object module is placed on the device specified by 
the SYSPUNCH DD statement. 

The object module is not placed on the device specified 
by the SYSPUNCH DD statement. 



LOAD j 
! NOLOAD 



(LIST ) 
(NOLIST) 



TEST 
NOTEST 



fXREF ) 

Inoxrefj 



.RENT 
NORENT 



h~ 



LINECNT=nn 



fALGN ' 
(NOALGNI 

h- 1— 

OS ) 

DOS 



The object module is placed on the device specified by 
the SYSGO DD statement. 

The object is not placed on the device specified by the 
SYSGO DD statement. 



An assembler listing is produced. 

An assembler listing is not produced. 



H 



H 



The object module contains the source symbol table 

required by TESTRAN. 

The object module does not contain the table required by 

TESTRAN. 



+- 



A cross-reference table of symbols is listed. 
A cross-reference table is not produced. 



The source program is checked for coding violations of 

program reenterability. 

The source program is not checked. 



H 



Specifies, as a number from 01 to 99, the number of lines 
to be printed between headings in the listing. 



+- 



The alignment error diagnostic message is not suppressed. 
The alignment error diagnostic message is suppressed. 



The assembler will have complete Operating System 
Assembler F capability. 

The assembler will behave like Disk Operating System 
(DOS) Assembler F. The DOS option is incompatible with 
the LOAD, TEST, RENT, or NOALGN options. 



Note ; Underscore the default values selected by your installation 
during system generation. 



i 
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Table 32. Assembler F - DD Statements 



ddname 



Data Set 
Information 



~+ 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



-H 



SYSLIB 



Code 

DS NAME=S YS 1 . MACLI B 

and DISP=SHR or 

use 

DSNAME=us er 1 ibr ar y 

Alternatively, the 

user library may 

be concatenated to 

SYS1.MACLIB. 



Omit. 



Omit. 



Omit. 



Omit. 



Optional. Existing 
partitioned data 
set. 



SYSUT1 
SYSUT2 
SYSUT3 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



You can request 

separation 

(SEP) 



Work data sets. 



, 

Optional. Listings 
are produced on 
this data set. 



SYSPRINT 



System output de- 
vice, printer, or 
intermediate stor- 
age. SYSOUT=A is 
usually specified. 



SYSPUNCHI | System output de- 

vice, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



SYSGO 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required | 
if on 
direct 
access. 



You can use 
DUMMY while 
testing the 
program. 

You can use 
DUMMY while 
testing the 
program. 



Optional. Object 
module is produced 
on this data set. 



SYS IN 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use DSNAME= 
SSdsname and DISP= 
(,PASS). If it is 
to be link edited 
or loaded in 
another job, de- 
fine a cataloged 
or kept data set. 



Optional. Same as 
SYSPUNCH but can 
be used as immedi- 
ate input to the 
linkage editor or 
loader. You can 
define a punched 
deck as in 
SYSPUNCH. 



Usually in the 
input stream; use 
* . 



Input to the 
(assembler (source 
I statements) . 
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COBOL E 



Table 33. COBOL E - Input Deck 



j COBOL E 
J. 



| //name 






| //jobname 


JOB 


parameters 


| //[name] 


EXEC 


PGM=IEPCBL00 [ ,PARM=parameters] 


| //SYS LIB 


DD 


parameters 


| //SYSUT1 


DD 


parameters 


| //SYSUT2 


DD 


parameters 


| //SYSUT3 


DD 


parameters 


| //SYSUT4 


DD 


parameters 


| //SYSPRINT 


DD 


parameters 


| //SYS PUNCH 


DD 


parameters 


| //SYS IN 


DD 


* or parameters 



Required 
Optional 
Required 
Required 
Required 
Optional 
Required 
Required 
Required 



Table 34. COBOL E - PARM Field of EXEC Statement 



PARM= 



h 



Meaning 



h- 



BUFSIZE= 



Indicates the size of each of the work buffers used dur- 
ing a COBOL compilation. 



DECK 
NODECK 



The object module is written on the device specified in 

the SYSPUNCE DD statement. 

An object module is not produced. 



H 



(FLAGE) 
\fLAGWJ 



hr 



The compiler suppresses warning diagnostic messages. 
The compiler will produce error and warning diagnostic 
messages. 



(LIST ) 
1NOLIST/ 



h 



A source listing is produced. 

A source listing is not produced. 



(DMAP \ 
(NODMAP/ 



A data-name listing is produced. 

A data-name listing is not produced. 



iPMAP 



NOPMAP 



A listing of object code for each statement in the Proce- 
dure Division is produced. 
A listing of object code is not produced. 



-H 



/MAPS ) 
(NOMAPS/ 



Equivalent to specifying both DMAP and PMAP. 
Equivalent to specifying both NODMAP and NOPMAP. 



DISPCK 



NODISPCKJ 



The compiler generates object code that tests whether a 
field to be displayed exceeds the record length of the 
device on which it is to be written. 
The test code will not be generated. 



REGED 



INVEDJ 



Specifies that the character " . w represents a decimal 

point and the character ",** represents an insertion 

character. 

The comma represents a decimal point and the period an 

insertion character. 



I 

LINECNT=nn 



-H 



Specifies, as a number from 10 to 99, the number of lines 
to be printed on each page of the compilation output 
listing. 



H 



Note : Underscore the default values selected by your installation 
during system, generation. 
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Table 35. 
r t— 



COBOL E - DD Statements 

T 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



SYSLIB 



Code 

DSNAME=us erl ibr ary 

and DISP=OLD or 

DISP=SHR. 



Required if data 
set was kept. 



Omit. 



Optional. User 
source program 
library. 



SYSUT1 
SYSUT2 
SYSUT3 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



Omit. 



Work data sets. 



H 



SYSUTU 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



Omit. 



Optional. Work 
data set needed 
when using debug 
packets. 



SYSPRINT 



System output de- 
vice, printer, or 
intermediate stor- 
age. SYSOUT=A is 
usually specified 



SYSPUNCH 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use DSNAME= 
&£dsname and DISP= 
(,PASS). If it is 
to be link edited 
or loaded in 
another job, de- 
fine a cataloged 
or kept data set. 
Omit DSNAME and 
DISP to produce 
punched deck. 



System output de- 
vice, card punch, 
magnetic tape or 
direct access. 
SYSOUT=B can be 
used. If you do 
not use SYSOUT, 
code UNIT; you 
can omit VOLUME 
and LABEL. 



Required 
if on 
direct 
access. 



You can use 
DUMMY while 
testing this 
program. 



Listings are pro- 
duced on this data 
set. 



H 



Object module is 
produced on this 
data set. 



SYSIN 



Usually in the 
input stream; use 
*. 



Input to the 
COBOL E compiler 
(source state- 
ments) . 
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COBOL F 



Table 36. COBOL F - Input Deck 



j COBOL F 
j. 



J //jobname JOB 


parameters 




| //[name] EXEC 


PGM=IEQCBLO [ , PARM=par ameter s 3 


Required | 


| //SYSLIB DD 


parameters 


Optional | 


| //SYSUT1 DD 


parameters 


Required | 


| //SYSUT2 DD 


parameters 


Required | 


| //SYSUT3 DD 


parameters 


Required | 


j //SYSUT4 DD 


parameters 


Required | 


| //SYSPRINT DD 


parameters 


Required | 


| //SYSPUNCH DD 


parameters 


Optional | 


| //SYSLIN DD 


parameters 


Optional | 


| //SYS IN DD 


* or parameters 


Required | 



Table 37. COBOL F - PARM Field of EXEC statement (Part 1 of 2) 



PARM= 



h 



Meaning 



SIZE=number 



Indicates the amount of main storage, in bytes, avail- 
able for compilation. 



BUF=number 



Indicates the amount of main storage, in bytes, to be 
allocated to buffers. 



f SOURCE ( 

Inosource/ 



-h 



A listing of the source module is produced. 

A listing of the source module is not produced. 



H 



fCLIST ) 

Inoclist/ 



A condensed listing is to be produced. 

A condensed listing is not to be produced. 



[MAP 



NOMAPJ 



A listing of a glossary, global tables, object code 
listing,, and assembler language expansion of the source 
module is to be produced. 
The listing is not to be produced. 



fDMAP ) 
(NODMAPJ 



A listing of a glossary is to be produced. 
A listing of a glossary is not to be produced 



H 



PMAP 
NOPMAP 
LOAD 
NOLOAD 



A listing of global tables and assembler language expan- 
sion is to be produced. 
The listing is not to be produced. 



H 



The object module is to be link edited or loaded. (Spe- 
cify the SYSLIN DD statement.) 
The object module is not to be link edited or loaded. 



h 



DECK 
NODECKj 
SEQ ) 
NOSEQ 



The object module is to be punched. (Specify the SYS- 
PUNCH DD statement.) 
The object module is not to be punched. 



The compiler is to check the sequence of the source 

statements . 

The compiler is not to check the sequence. 



H 



j'FLAGWj 
\FLAGEj 



All warning and diagnostic messages are to be listed. 
Only diagnostic messages are to be listed. 
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Table 37. COBOL F - PARM Field of EXEC Statement (Part 2 of 2) 

r t 



PARM= 



h 



Meaning 



h 



SUPMAP 



iNOSUPMAPJ 



The object code listing, object module and output deck 
are to be suppressed if an E or D level message is 
generated by the compiler. 
Those items are not to be suppressed. 



/BASIS ) 
(NOBASISJ 



A BASIS card may be in the source module. 
A BASIS card is not in the source module. 



(COPY \ 
(NOCOPY) 



A COPY or INCLUDE statement may be in the source module. 
A COPY or INCLUDE statement is not in the source module. 



LINECNT=nn 



Specifies, as a number from 01 to 99, the number of 
lines to be printed on each page of the compilation out- 
put listing. 



SPACE 1 
SPACE2 
SPACE 3 



K- 



The listing of the source module has single spacing. 
Double spacing. 
Triple spacing. 



Note : Underscore the default values selected by your installation 
during system generation. 
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Table 38. COBOL F ■ - DD Statements 



ddname 

t 

SYSLIB 



SYSUT1 



SYSUT2 
SYSUT3 
SYSUT4 



Code 

DS NAME=user library 

and DISP=OLD or 

DISP=SHR. 



SYSPRINT 



k + 

SYSPUNCH 



^ 

SYSLIN 



~+ 



f 

SYSIN 



Data Set 
Information 



Temporary. You can 
omit DSNAME and 
DISP . 



Temporary. You can 
omit DSNAME and 
DISP. 



Location of the 
Data Set 



Required if data 
set was kept. 



Omit. 



Direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 

Magnetic tape or j Required 

direct access. jif on 

UNIT is required. | direct 

You can omit j access. 

VOLUME and LABEL. 

+ + 

System output 
device, printer or 
intermediate 
storage. SYSOUT=A 
usually specifed. 

System output 
device., card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 

If the object mod-|Magentic tape or | Required 
ule is to be link | direct access. jif on 
edited or loaded |UNIT is required. | direct 
in a subsequent jYou can omit I access, 
step of the same (VOLUME and LABEL, 
job, use 
DSNAME= £ Sdsname 
and DISP=(,PASS). 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Usually in the 
input stream; use 

I*. 

i 






Sxze 

of the 

Data Set 



Omit. 



Required 



Data 
Attributes 



-+ 



Omit. 



You can 
specify 
BLKSIZE 
and LRECL. 



You can 
specify 
BLKSIZE or 
LRECL. 



Omit. 






You can 
specify 
BLKSIZE or 
and LRECL. 



| You can 

specify 

| BLKSIZE 

-A 



Special 

Processing 

Options 



+ 

Optional. User 
source program 
library . 



Omit. 



. , 

Work data sets. 



Work data sets. 



Listings are pro- 
duced on this data 
set. 



You can use 
DUMMY while 
testing this 
program. 



You can use 
DUMMY while 
testing this 
program. 



Comments 



Optional. Object 
module is produced 
on this data set. 



Optional. Same as 
SYSPUNCH but can 
be used as inter- 
mediate input to 
linkage editor or 
loader. 



Input to the COBOL 
F compiler (source 
statements ) . 
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American National Standard COBOL 



Table 39. American National Standard COBOL - Input Deck 



//jobname 
// [name] 
//SYSLIB 
//SYSUT1 
//SYSUT2 
//SYSUT3 
//SYSUT4 
//SYS PRINT DD 
//SYSPUNCH DD 
//SYSLIN DD 
| //SYS IN DD 



JOB parameters 

EXEC PGM=IKFCBLO [ , PARM=par amet er s ] 

DD parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

* or parameters 



DD 
DD 
DD 
DD 



Required 
Optional 
Required 
Required 
Required 
Required 
Required 
Optional 
Optional 
Required 



Table 40. American National Standard COBOL - PARM Field of EXEC Stateme 
(Part 1 of 2) 



| PARM= | 
|. f 

SIZE=nunber 



Meaning 



(SOURCE \ 
(NOSOURCEJ 

h T- 

CLIST I 



BUF=number 



NOCLIST 



/XREF \ 
(NOXREFj 



(DMAP | 
(NODMAP/ 



[PMAP 



NOPMAPJ 



K 



LOAD 
NOLOAD 
DECK 
NODECK 



SEQ 
NOSEQ 



K 

/FLAGW ) 
(FLAGE/ 



Indicates the amount of main storage, in bytes, avail- 
able for compilation. 



Indicates the amount of main storage, in bytes, to be 
allocated to buffers. 



A listing of the source module is produced. 

A listing of the source module is not produced. 



A condensed listing is to be produced. CLIST and PMAP 

are mutually exclusive. 

A condensed listing is not to be produced. 



A cross-reference listing is to be produced. 

A cross-reference listing is not to be produced. 



A listing of a glossary is to be produced. 

A listing of a glossary is not to be produced, 



H 



A listing of global tables and assembler language expan- 
sion is to be produced. PMAP and CLIST are mutually 
exclusive. 
The listing is not to be produced. 



H 



The object module is to be link edited or loaded. (Spe- 
cify the SYSLIN DD statement.) 
The object module is not to be link edited or loaded. 



The object module is to be punched. (Specify the SYS- 
PUNCH DD statement.) 
The object module is not to be punched. 



The compiler is to check the sequence of the source 

statements . 

The compiler is not to check the sequence. 



H 



All warning and diagnostic messages are to be listed. 
Only diagnostic messages are to be listed. 
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Table 40. American National Standard COBOL - PARM Field of EXEC 
Statement (Part 2 of 2) 



PARM= 



Meaning 



SUPMAP 



NOSUPMAP/ 



The object code listing, object module and output deck 
are to be suppressed if an E level message is generated 
by the compiler. 
Those items are not to be suppressed. 



QUOTE 
APOST 



The double quote C) is used to delineate literals and 
in the generation of figurative constants. 
The apostrophe (•) is used to delineate literals in the 
generation of figurative constants. 



I 



TRUNC 



NOTRUNCJ 



A COMPUTATIONAL arithmetic item is truncated to the 
nunber of digits specified in the PICTURE clause when 
moved . 

The movement of the item depends on the size of the 
field (half word or full word) . 



I— 

|LINECNT=nn 



SPACE1 
SPACE2 
SPACE 3 



Specifies, as a nunber from 01 to 99, the number of 
lines to be printed on each page of the compilation out- 
put listing. 

The listing of the source module has single spacing. 
Double spacing. 

j Triple spacing. 

^- 

| Note : Underscore the default values selected by your installation 

I during system generation 

L 
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Table 41. American National Standard COBOL - DD Statements 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



H 



SYSLIB 



Code 

DSNAME=user library 
and DISP=OLD or 
DISP=SHR 



Required if data 
set was kept. 



Omit. 



Optional. User 
source program 
library. 



H 



SYSUTl 



Temporary. You can 
omit DSNAME and 
DISP. 



Direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 



Omit. 



Omit. 



Work data sets. 



H 



SYSUT2 
SYSUT3 
SYSUT4 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access . 



Omit. 



Omit 



Work data sets. 



SYSPRINT 



System output 
device, printer or 
intermediate 
storage. SYSOUT=A 
usually specified. 



You can 
specify 
BLKSIZE 
and LRECL. 



Listings are pro- 
duced on this data 
set. 



, 

Optional . Ob j ect 
module is produced 
on this data set. 



SYSPUNCH 



~+ 



System output 
device, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



You can 
specify 
BLKSIZE or 
LRECL. 



You can use 
DUMMY while 
testing this 
program. 



SYSLIN 



If the object mod- 
ule is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use 
DSNAME=S6dsname 
and DISP=(, PASS) . 
If it is to be 
link edited or 
loaded in another 
job,, define a cat- 
aloged or kept 
data set. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
If on 
direct 
access. 



You can 
specify 
BLKSIZE or 
and LRECL. 



You can use 
DUMMY while 
testing this 
program 



Optional. Same as 
SYSPUNCH but can 
be used as inter- 
mediate input to 
linkage editor or 
loader . 



H 



SYSIN 



Usually in the 
input stream; use 



You can 
specify 
BLKSIZE 



Input to the 
American National 
Standard COBOL 
compiler (source 
statements) . 
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FORTRAN E 

Table 42. FORTRAN E - Input Deck 



| FORTRAN E 
J. __. 

//jobname 
//[name] 
//SYSUT1 
//SYSUT2 
//SYSPRINT DD 
//SYSPUNCH DD 
//SYS LIN DD 
//SYSIN DD 



JOB parameters 

EXEC PGM=IEJFAAAO[,PARM=parameters] 



DD 
DD 



parameters 
parameters 
parameters 
parameters 
parameters 
* or parameters 



Required 
Required 
Required 
Required 
Optional 
Optional 
Required 



< 
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Table 4 3. FORTRAN E - PARM Field of EXEC Statement 

r t 



PARM= 



h 



H- 



SI Z E= ( nnnnnnnl 
(nnnnK / 



-+• 



Meaning 



LINELNG=nnn 



NAME=name 



(BCD \ 
\ EBCDIC/ 



SOURCE 
NOSOURCE 



DECK 
NODECK 



MAP 



NOMAP 



LOAD 
NOLOAD 



(SPACE 



PRFRM 



ADJUST 



NOADJUST 



h~ 



Specifies the maximum number of bytes available to 
the compiler. You can specify a number from 15360 to 
999999, or 15K to 9999K. (K=1024 bytes.) 



Specifies, as a number from 001 to 999, the maximum 
length of a record written under control of a FORMAT 
statement. 



Specifies the name assigned to the compiled module. 
The name can have up to six alphameric characters, 
the first of which must be a letter. 



H 



The source program is written in BCD. 
The source program is written in EBCDIC, 



The source program is listed on the data set speci- 
fied by the SY SPRINT DD statement. 
The source program is not listed. 



The object module is written on the device specified 
by the SYSPUNCH DD statement. 
The object module is not written. 



A storage map is produced on the device specified by 

the SYSPRINT DD statement. 

A storage map is not produced. 



The object module is written on the data set speci- 
fied by the SYSLIN DD statement. 
The object module is not written. 



Specifies that 1536 bytes of main storage are used 
for compilations and the remainder of the space spe- 
cified with SIZE is used for the dictionary, overflow 
table, and I/O buffers. 

Specifies that the first 19456 bytes specified in 
SIZE are used for compilations, and the rest is used 
for dictionary, overflow table and I/O buffers. 



The source program is to be scanned for meaningful 
blanks, embedded blanks and keywords used as variable 
names and put into a form acceptable to the compiler. 
The source program is not to be scanned. 



Note ; Underscore the default values selected by your installation 
during system generation. 
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Table 44. FORTRAN E - DD Statements 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



SYSUT1 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit. 



Omit. 



Work data sets. 



SYSPRINT 



System output 
device, printer or 
intermediate 
storage. SYSOUT=A 
is usually speci- 
fied. 



1 

SYSPUNCH 



You can 
specify 
BLKSIZE if 

you use 
the PRFRM 
opti on. 



Listings are pro- 
duced on this data 
set. 



System output 
device, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



I— 



SYSLIN 



+- 



+- 



You can 
specify 
BLKSIZE if 
you use 
the PRFRM 
option. 



You can use 
DUMMY while 
testing the 
program. 



If the object mod- 
ule is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use 
DSNAME= 6 Sdsname 
and DISP=(,PASS). 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 






Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE if 
you use 
the PRFRM 
option. 



You can use 
DUMMY while 
testing the 
program. 



Optional. Object 
module is produced 
on this data set. 



Optional. Same as 
SYSPUNCH but can 
be used as inter- 
mediate input to 
linkage editor or 
loader . 



SYS IN 



Usually in the 
input stream; 
use *. 



You can 
specify 
BLKSIZE if 
you use 
the PRFRM 
option. 



Input to the 
FORTRAN E compiler 
(source state- 
ments) . 



( 
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FORTRAN G 



Table 45. FORTRAN G - Input Deck 

r 

| FORTRAN G 

h 



//jobname JOB parameters 

//[name] EXEC PGM=IEYFORT t,PARM=parameters] 

//SYS PRINT DD parameters 

//SYSPUNCH DD parameters 

//SYS LIN DD parameters 

//SYS IN DD * or parameters 



Required 
Required 
Optional 
Optional 
Required 



Table 46. FORTRAN G - PARM Field of EXEC Statement 



PARM= 



H- 



h- 



h- 



h 



NAME=name 



(BCD \ 
(EBCDIC/ 



SOURCE 
NOSOURCE 



DECK 

nodeck' 



MAP 



NOMAP 



LOAD 
NOLO AD 



H 



k 



LIST j 
NOLIST 



LINECNT=nn 



ID 



NOID 



Meaning 



Specifies the name assigned to the compiled module. The 
name can have up to six alphameric characters, the first 
of which must be a letter. 



The source program is written in BCD. 
The source program is written in EBCDIC. 



The source program is listed on the data set specified by 

the SYSPRINT DD statement. 

The source program is not listed. 



The object module is written on the device specified by 

the SYSPUNCH DD statement. 

The object module is not written. 



A table of names is written on the data set specified by 

the SYSPRINT DD statement. 

A table of names is not written. 



The object module is written on the data set specified by 

the SYSLIN DD statement. 

The object module is not written. 



The object module is listed on the device specified by 

the SYSPRINT DD statement. 

The object module is not listed. 



Specifies, as a number from 01 to 99, the number of lines 
to be printed on each page of the source listing. 



Internal statement numbers are to be generated for state- 
ments that call a subroutine or contain external function 
references. 
Internal statement numbers are not to be generated. 



Note ; Underscore the default values selected by your installation 
during system generation. 
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Table 47. FORTRAN G - DD Statements 



r t 

ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



, 

Listings are pro- 
duced on this data 
set. 



SYSPRINT 



System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
is usually speci- 
fied. 



Omit. 



, 

Optional . Ob j ect 
module is produced 
on this data set. 



SYSPUNCH 



System output 
device, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



Omit. 



You can use 
DUMMY while 
testing the 
program . 



SYSLIN 



If the object mod- 
use is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use 
DSANME= S 6dsname 
and DISP=(,PASS). 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



Omit, 



You can use 
DUMMY while 
testing this 
program. 



Optional. Same as 
SYSPUNCH, but can 
be used as inter- 
mediate input to 
linkage editor or 
loader. You can 
define a punched 
deck as in 
SYSPUNCH. 



SYSIN 



Usually in the 
input stream; 
use *. 



Omit. 



, 

Input to the 
FORTRAN G compiler 
(source state- 
ments) . 



( 
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FORTRAN H 



Table 48. FORTRAN H - Input Deck 



FORTRAN H 



//jobname JOB parameters 

//[name] EXEC PGM=IEKAA00 [,PARM=parameters] 

//SYSUT1 DD parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

* or parameters 



//SYSUT2 DD 
//SYSABEND DD 
//SYS PRINT DD 
//SYSPUNCH DD 
//SYSLIN DD 
//SYS IN DD 



Required 
Optional 
Optional 
Required 
Required 
Optional 
Optional 
Required 
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Table 49. FORTRAN H - PARM Field of EXEC Statement 
r 



T" 

PARM= J 



h 



Meamng 



NAME=name 



Specifies the name assigned to the compiled module. The 
name can have up to six alphameric characters the first 
of which must be a letter. 



(BCD \ 
(EBCDIC J 



The source program is written in BCD. 
The source program is written in EBCDIC, 



h- 



SOURCE | 
NOSOURCE ' 



The source program is listed on the data set specified by 

the SYSPRINT DD statement. 

The source program is not listed. 



DECK 
NODECK 



The object module is written on the device specified by 

the SYSPUNCH DD statement.. 

The object module is not written. 



MAP 
NOMAP 



A table of names is written on the data set specified by 

the SYSPUNCH DD statement. 

A table of names is not written. 



I LOAD , 

noload' 



The object module is written on the data set specified by 

the SYSLIN DD statement. 

The object module is not written. 



LIST , 
NOLIST 



\ 

LINECNT=nn 



The object module is listed on the device specified by 

the SYSPRINT DD statement. 

The object module is not listed. 



Specifies as a number from 01 to 99, the number of lines 
to be printed on each page of the source listing. 



!ID 



h- 



INOIDJ 



Internal statement numbers are to be generated for state- 
ments that call a subroutine or contain external function 
references . 
Internal statement numbers are not to be generated. 



OPT=0 
OPT=l 

OPT=2 



The object module is not to be optimized. 

The object module receives full register assignment and 

basic otimization. 

The object module receives full register assignment and 

complete optimization. 



H 



EDIT 



NOEDIT i 



A structured source listing is written on the data set 
specified by the SYSPRINT DD statement. (OPT=2 and a 
SYSUT1 DD statement are required. ) 
A structured source listing is not written. 



H 



fXREF 



iNOXREFl 



A cross-reference listing is written on the data set spe- 
cified by the SYSPRINT DD statement. (A SYSUT2 DD state- 
ment is required.) 
A cross-reference listing is not written. 



H 



Note ; Underscore the default values selected by your installation 
during system generation. 



294 JCL User's Guide (Release 20.1) 



Table 50. FORTRAN fl - DD Statements 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



r-j- 

Data 
Attributes 



Special 

Processing 

Options 



Comments 



H 



SYSUTl 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



Omit. 



Required only if 
you use EDIT 
option. 



SYSUT2 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



Omit. 



Required only if 
you use XREF 
option. 



, 

Optional. Abnormal 
termination dump 
is usually pro- 
duced on this data 
set. Code as de- 
scribed for "Ab- 
normal Termination 
Dump" in the 
section "Special 
DD Statements. " 

Listings are pro- 
duced on this data 
set. 



SYSABEND 

or 
SYSUDUMP 



SYSPRINT I 



SYSPUNCH I 



System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
is usually speci- 
fied. 



System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
is usually speci- 
fied. 

System output 
device,, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



You can 
specify 
BLKSIZE. 






You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing the 
program. 



1 

Optional . Obj ect 
module is produced 
on this data set. 



I 

SYSLIN 



SYSIN 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use 
DSNAME= 6 fidsname 
and DISP=C,PASS) . 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing this 
program. 



Optional. Same as 
SYSPUNCH, but can 
be used as inter- 
mediate input to 
define a punched 
deck as in 
SYSPUNCH. 



Part III 



Usually in the 
input stream; 
use *. 



You can 
specify 
BLKSIZE. 






Input to the j 

FORTRAN H compiler | 
(source state- | 

ments) . | 
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PL/I F 



Table 51. PL/I F - Input Deck 



j PL/I F 

//job name 
// [ name ] 
//SYSLIB 
//SYSUT1 
//SYSUT3 
//SYSPRINT DD 
//SYSPUNCH DD 
//SYSLIN DD 
//SYSIN DD 



JOB parameters 

EXEC PGM=IEMAA[ ,PARM=parameter] 

DD parameters 

parameters 

parameters 

parameters 

parameters 

parameters 

* or parameters 



DD 
DD 



Required 
Optional 
Optional 
Optional 
Required 
Optional 
Optional 
Required 



Table 52. PL/I F - PARM Field of EXEC Statement (Part 1 of 3) 

Meaning 



| PARM= | 
1" 



SIZE= fnnnnnn) 
\nnnK / 



Specifies the maximum number of bytes available to the 
compiler. You can specify a number from 45056 to 
999999 or 44K to 999K. (K=1024 bytes.) 



LINECNT=nn 



Specifies, as a number from 10 to 99, the number of 
lines to be printed on each page of the output 
listing. 



SOURCE 
NOSOURCE 



The source program is to be listed on the device spe- 
cified by the SYSPRINT DD statement. 
The source program is not to be listed. 



LIST 
NOLIST 



The object module is to be listed on the device speci- 
fied by the SYSPRINT DD statement. 
The object module is not to be listed. 



OPLIST 
NOOPLIST 



The list of compiler options is to be listed on the 
device specified by the SYSPRINT DD statement. 
The list of compiler options is not to be listed. 



H 



EXTREF 
NOEXTREF 



The external symbol dictionary is listed on the device 

specified by the SYSPRINT DD statement. 

The external symbol dictionary is not listed. 



-H 



ATR 
NOATR 



The attribute table is to be listed on the device spe- 
cified by the SYSPRINT DD statement. 
The attribute table is not to be listed. 



i 



XREF 
NOXREF 



A cross-reference table is to be listed on the device 

specified by the SYSPRINT DD statement. 

A cross-reference table is not to be listed. 



-H 



DECK 
NODECK 



The object module is written on the device specified 
by the SYSPUNCH DD statement. 
The object module is not written. 



H 



LOAD 
NOLOAD 



The object module is written on the data set specified 

by the SYSLIN DD statement. 

The object module is not written. 



j OB JNM=name 

i 



j Specifies the name assigned to the object module. 
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Table 52. PL/I F - PARM Field of EXEC Statement (Part 2 of 3) 



PARM= 



Meaning 



OPT=00 
OPT=01| 
[OPT=02 



fBCD ) 
(ECBDIC/ 



SQRMGIN= 
(m,n, [,c3) 



CBAR60 
CHAR48 



STMT 



NOSTMT 



IFLAGW 
FLAGE 
FLAGS 



(MACRO \ 
(NOMACRQj 



SOURCE2 
NOSOURCE2 



COMP 
NOCOMP 



(EXTDIC \ 
iNOEXTDICj 




The object module is to be optimized unless it 
increases object time storage requirements. 
The object module is to be optimized even if it 
increases object time storage requirements. 
The object module is to be optimized even if it 
increases object time storage requirements. In addi- 
tion, machine instructions generated for certain types 
of DO- loops and expressions in subscript lists are to 
be optimized. 



The source program is written in DCB. 
The source program is written in EBCDIC. 



Specifies the margin for scanning source statements. 
The following conditions must be met: 

2<m<n<100 

c=b|0|-|+|l 



H 



The character set used to write the source program has 
60 characters. 

The character set used to write the source program has 
48 characters. 



Diagnostic messages produced during execution of object 

program are to contain source program statement 

numbers. 

Diagnostic messages are not to contain source program 

statement numbers. 



H 



Working messages, error messages and severe error mes- 
sages are to be printed. 

Only error messages and severe error messages are to be 
printed. 
Only severe error messages are to be printed. 



Compile time processing is required. 
Compile time processing is not required. 



H 



The input to the compile-time processor is to be listed 
on the device specified by the SYSPRINT DD statement. 
The input to the compile-time processor is not to be 
listed. 



H 



Compilation is to proceed after compile-time processing 

ends . 

Compilation is not to proceed after compile-time 

processing. 



A large dictionary is to be used. 
A normal dictionary is to be used. 



H 



The depth of nesting is indicated in the source 

listing. 

The depth of nesting is not indicated. 



H 



The output of the compile-time processor is written on 
the device specified by the SYSPUNCH DD statement. 
The output of the compile-time processor is not to be 
written. 



Part III 



Part III: JCL for Compilers, Linkage Editors and Loader 297 



Table 52. 

i 

I PARM= 



PL/I F - PARM Field of EXEC Statement (Part 3 of 3) 

T _ 



Meaning 



f f _ _ < 

I/M91 ) | The object program is to be executed on a Model 91. 
(N0M91J | The object program is not to be executed on a Model 91. 
,. + „ f 

[SYNCHKEj | Compilation is terminated if errors of severity ERROR 

/ J or above are found during the syntax check. 
[SYNCHKS > | Compilation is terminated if errors of severity SEVERE 

I | or above are found during the syntax check. 
SYNCHKT/ I Compilation is terminated immediately if an error of 
| severity TERMINATION is encountered during the syntax 
| check. 
f i. _ 1 

Note ; Underscore the default values selected by your installation 
during system generation. 

L J 
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Table 53. PL/ I F - DD Statements 



ddname 



Data Set 
Information 



Location of the 
Data Set 



Size 

of the 

Data Set 



Data 
Attributes 



Special 

Processing 

Options 



Comments 



H 



SYSUTl 



Temporary. You can 
omit DSNAME and 
DISP. 



Direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 



You can 
specify 
OPTCD=W. 



Omit. 



Required if SIZE 
is less than 52K, 
or if source pro- 
gram does not fit 
in main storage. 
It is recommended 
that you always 
use this data set. 



SYSUT3 



Temporary. You can 
omit DSNAME and 
DISP. 



Magnetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



Omit. 



Required for 
compile-time pro- 
cessing and for 
programs that use 
the 48-character 
set. 



SYSLIB 



J. 

SYSPRINT 



Code J Omit. 

DSNAME=SYS1. PL1LIB 
and DISP=SHR. You 
can also use user 
libraries with a 
different ddname. 



--+ 

I Omit . 



Omit. 



Omit. 



k 

SYSPUNCH 






System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
usually specified. 



You can 
specify 
BLKSIZE. 



Required for com- 
pile-time process- 
ing. 



Listings are pro- 
duced on this data 
set. 



I 

SYSLIN 



System output 
device, card punch 
or intermediate 
storage. SYSOUT=B 
usually specified. 



You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing the 
program. 



1 

Optional. Object 
module is produced 
on this data set. 



If object module 
is to be link 
edited or loaded 
in a subsequent 
step of the same 
job, use 
DSNAME= £ fedsname 
and DISP=(,,PASS) . 
If it is to be 
link edited or 
loaded in another 
job, define a cat- 
aloged or kept 
data set. 



Mangetic tape or 
direct access. 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



Required 
if on 
direct 
access. 



You can 
specify 
BLKSIZE. 



You can use 
DUMMY while 
testing the 
program. 



Optional. Same as 
SYSPUNCH but can 
be used as 
immediate input to 
linkage editor or 
loader . 
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, 

Input to the PL/ I | 
F compiler (source j 
statements). | 

J 



SYSIN 



Usually in the 
input stream; 
use *. 



You can 
specify 
BLKSIZE. 
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Linkage Editor 

The linkage editor processes the compiled source program (object module) 
and prepares it for execution. After the object module is link edited 
it is called a load module; that is the load module is your program in 
executable form. Execution of the load module is performed in a subse- 
quent job step (called a go step) . The linkage editor can be used for 
compile-link edit-go, compile-link edit, link edit, and link edit-go 
jobs. 



Table 54, Linkage Editor - Input Deck 

i 

I LINKAGE EDITOR 



f 



H 



//[name] EXEC PGM=(see note) [,PARM=parameters] 



//SYS LIB DD 

//SYSUT1 DD 

//SYSPRINT DD 

//SYSLMOD DD 

//SYSLIN DD 



parameters 
parameters 
parameters 
parameters 
* or parameters 



Required 
Optiona 1 
Required 
Required 
Required 
Required 



Note ; Specify the name of the linkage editor you want to use in the 
PGM parameter: 

Name Linkage Editor 

IEWLE150 15K-design level E 

IEWLE180 18K-design level E 

IEWLF440 44K-design level F 

IEWLF880 88K-design level F 

IEWLF128 128K-design level F 

IEWL ) Largest design level available in your system 

LINKEDIT / 



Table 55, 

r 



Linkage Editor - PARM Field of EXEC Statement (Part 1 of 2) 



PARM= 



Meaning 



I 

LET 



LIST 



{MAP ) 
XREFJ 



XCAL 



All linkage editor control statements included 
in the step are listed on the device specified 
by the SYSPRINT DD statement. 



A load module map is produced on the device 
specified by the SYSPRINT DD statement. 
A cross-reference table of the load module is 
produced on the device specified by the SYS- 
PRINT DD statement. (XREF includes MAP.) 



The load module is marked executable even 
though a severity 2 error condition was found 
during processing. 



The load module is marked executable even 
though valid exclusive references between seg- 
ments have been made. 



H 



H 



NCAL I Library members are not called to resolve 

external references within the linkage editor 

input. The load module is marked executable 

even though unresolved external references have 

| been recognized. | 

j. ; j 



( 
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Table 55. Linkage Editor - PARM Field of EXEC Statement (Part 2 of 2) 

r T • 1 



PARM= 



h 



Meaning 



"» 



SIZE= (valuei .value 2 ) 



Value^ specifies the maximum number of bytes of 
main storage to be used by the level F linkage 
editor. Value 2 specifies the maximum portion 
of value to be used as the load module buffer. 



DCBS 



Means that the SYSLMOD DD statement specifies 
the BLKSIZE subparameter in its DCB parameter. 
For level F only. 



[OVLY 

SCTR 

IfllARj 



The load module is to be in an overlay struc- 
ture suitable only for block loading. 
The load module is to be in a format suitable 
for block or scatter loading. 
Control sections within the load module are 
marked for loading (block or scatter) into the 
hierarchies specified with the HIARCHY control 
statement. 



H 



REFR 



The load module is marked refreshable. 



/rent) 

(REUS ( 



The load module is marked reenterable. 

The load module is marked serially reusable. 



NE 



The load module has no external symbol dic- 
tionary (ESD) and it cannot be reprocessed by 
the linkage editor. 



H 



OL 



The load module can be brought into main 
storage only by the LOAD macro instruction. 
(Only loadable.) 



DC 



Load modules processed by the level F linkage 
editors can be reprocessed by level E linkage 
editors. (Downward compatible.) 



H 



TEST | TESTRAN symbol tables within the input modules 

are placed in the load module. (Do not specify 
RENT or REUS when you specify TEST. ) 
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Table 56. Linkage Editor - DD Statements (Part 1 of 2) 



SYSUTl 



ddname 



SYSLIB 



Code 

DSNAME=dsname and 
DISP=SHR. Usually 
the language li- 
brary for your 
compiler, that is 
SYSl.ALGLIB, 
SYS1.COBLIB, 
SYS1.F0RTLIB, or 
SYS1.PL1LIB. Any 
user library can 
be defined. Alter- 
natively the user 
library can be 
concatenated. 

Temporary. You can 
omit DSNAME and 
DISP. 



SYSPRINT 



Data Set 
Information 



Direct access . 
UNIT is required. 
You can omit 
VOLUME and LABEL. 



--+. 



Location of the 
Data Set 



UNIT and VOLUME 
are required if 
library is kept. 



Size 

of the 

Data Set 

+ 

Omit 



System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
usually specified. 



Omit. 






Required 



Data 
Attributes 



Omit. 



Omit. 



You can 
specify 
BLKSIZE if 
you are 
using 
level F. 



Special 

Processing 

Options 



Omit,. 



Comments 

Call library. 
Partitioned data 
set. 



Work data set. 



Listings are pro- 
duced on this data 
set. 



H 



| 



SYSLMOD 



The partitioned 
data set can be 
temporary or non- 
temporary. If you 
do not include a 
NAME control 
statement specify 
DSNAME=dsname (mem- 
ber) or DSNAME= 
&£dsname (member) . 
If you are creat- 
ing the data set, 
code (or omit) NEW 
in DISP parameter. 
If the data set 
exists, code MOD 
in DISP parameter . 
If "go" step is in 
the same job, code 
DISP=(,PASS) or 
DISP= (MOD, PASS) . 
If "go" step is 
not in the same 
job, keep or cata- 
log the data set. 



Direct access. 

• If you are cre- 
ating the data 
set, code UNIT. 
You can omit 
VOLUME and 
LABEL. 

• If data set is 
cataloged, you 
can omit UNIT, 
VOLUME and 
LABEL. 

• If data set is 
kept, code UNIT 
and VOLUME. You 
can omit LABEL. 



Required 
if you 
are 

creating 
the data 
set. 



Load module (s) is 
produced on this 
partitioned data 
set. 
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Table 56. Linkage Editor - DD Statements (Part 2 of 2) 



ddname 



SYSLIN 



Data Set 
Information 

If object module 
was created in a 
previous step of 
the same job, make 
a backward refer- 
ence, i.e., 
DSNAME=* . st epname . 
ddname and 
DISP=OLD. If 
object module was 
created in another 
job, code 
DSNAME=dsname and 
DISP=OLD. If 
object module is 
a card deck, omit 
DSNAME and DISP. 
You can concate- 
nate input data 
sets as long as 
they have the same. 
RECFM, BLKSIZE, 
DEN, and TRTCH. 



Location of the 
Data Set 



If object module 
was created in a 
previous step, you 
can omit UNIT, 
VOLUME and LABEL. 
If object module 
is kept, code UNIT 
and VOLUME. You 
can omit LABEL. 
If object module 
is card deck use * 



Size 

of the 

Data Set 



Omit. 



Special 
Data | Processing | Comments 
Attributes! Options 

Omit. 



If object 
module is 
on unlab- 
led tape, 
specify 
RECFM, 
BLKSIZE, 
DEN, and 
TRTCH. 



Input to the 
linkage editor 
(object module) 



1 
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Loader 



The loader processes the compiled source program (object module) for 
execution and passes control to it directly. Loader processing is per- 
formed in a load step, which is equivalent to the link ed it-go steps. 
The loader can be used for compile-load, and load jobs. 

Table 57. Loader - Input Deck 



J Loader 
I" 



j // [name] EXEC PGM=LOADER [ , PARM= • loaderparm/programparm* ] 

| //SYS LIB DD parameters 

j //SYSLOUT DD parameters 

| //SYSLIN DD * or parameters 

| DD statements and data required for loaded program 

h 



i 

Required | 
Optional j 
Optional | 
Required | 

I 
— 4 



| Note ; The ddnames required by the loader can be changed during 
| system generation. 

L 



Table 58. 

r 



Loader - PARM Field of EXEC Statement (Part 1 of 2) 

— 1 

| Meaning 



h 



PARM= 
MAP 7 

NOMAPJ 
RES ) 
NORES 



1 



A map of the loaded program is produced on the device 
specified by the SYSOUT DD statement. 

A map is not produced. 



An automatic search of the link pack area is made. If 

you specify RES, CALL is assumed. 

The link pack area is not to be searched. 



H 



I CALL 

'nocall 



An automatic search of the data set defined by the SYS- 

LIB DD statement is to be made. 

The SYSLIB data set is not be searched. NOCALL can also 

be coded as NCAL. If you code NOCALL or NCAL, NORES is 

assumed. 



h- 



LET 
NOLET 



The loader tries to execute the loaded program even 
though a severity 2 error condition is found. 
The loader does not try to execute the loaded program if 
a severity 2 error is found. 



SIZE=size 



Specifies the amount of main storage, in bytes, that can 
be used by the loader. 



EP=name 



Specifies the external name to be assigned as the entry 
point of the loaded program. For FORTRAN, ALGOL, and 
PL/I, you must specify MAIN, IHIFSAIN, and IHENTRY, 
respectively. 



PRINT 
NOPRINT 



Diagnostic messages are produced on the device specified 
by the SYSOUT DD statement. 
Diagnostic messages are not produced. 
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Loader - PARM Field of EXEC statement (Part 2 of 2) 

_ T 



Meaning 



You may code PARM subparameters required by your program 
after any loader subparameters you use. The loaded pro- 
gram subparameters, if any, must be separated from the 
loader subparameters by a slash (/). If there are no 
loader options, the program subparameters must begin 
with a slash. 



H 



Underscore the default options selected by your installation 
during system generation. 



H 
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Table 59. Loader - DD Statements 



ddname 



SYSLIB 



Data Set 
Information 



Code DSNAME=dsname 
and DISP=SHR or 
DISP=OLD. Usually 
the language lib- 
rary for your 
compiler; that is 
SYS1.ALGLIB, 
SYS1.COBLIB, 
SYS1.F0RTLIB, or 
SYS1.PL1LIB. Any 
user library can 
be defined. Alter- 
natively, the user 
libraries can be 
concatenated. 



Location of the 
Data Set 



UNIT and VOLUME 
are required if 
library is kept. 



--+ 



Size 

of the 

Data Set 



Omit. 



Data 
Attributes 



Omit. 



Special 

Processing 

Options 



Omit. 



Comments 



Call library. 
Partitioned data 
set. 



H 



SYSLOUT 



System output 
device, printer 
or intermediate 
storage. SYSOUT=A 
usually specified. 



Listings are pro- 
duced on this data 
set. 



-+ 



H 



SYSLIN 



If object module 
was created in a 
previous step, you 
can omit UNIT, 
VOLUME and LABEL. 
If input is kept, 
code UNIT and 
VOLUME. You can 
omit LABEL. If 
object module is 
card deck, use *. 



If object module I If object module |Omit. 
was created in a 
previous step of 
the same job , make 
a backward refer- 
ence, i.e. , 
DSNAME=* . st epname 
ddname and 
DISP=OLD. If 
object module was 
created in another | 
job code DSNAME= 
dsname and DISP= 
OLD. If object 
module is a card 
deck, omit DSNAME 
and DISP. You can 
concatenate input 
data sets. 

J. X X X 

any DD statements required to execute your program. 



Omit. 



Input to the 
loader (object 
modules and load 
modules) . 



I 



I Include 
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Examples 

Examples are shown in this section for different types of job. 

1. Compile (COBOL E) 

In the following example, a COBOL E source program is compiled. 
The source program is in the input stream (SYSIN) . The object 
module is placed on a cataloged data set named COMP. COBOL. This 
data set resides on tape. Debug packets are not used, so the 
SYSUT4 DD statement is not needed. The user source program library 
(SYSLIB) is required. 



//EX1 

//COMP 

//SYSLIB 

//SYSUT1 

//SYSUT2 

//SYSUT3 



DD 
DD 
DD 



JOB 7 9 324 , SMITH 

EXEC PGM=IEPCBLOO,PARM= (DECK, MAPS, LIST) 

DD DSNAME=SYS1.C0BLIB,DISP=SHR 

UNIT=2311,SPACE=(TRK, (50,10)) 
UNIT=2400 
UNIT=2400 
SYSOUT=A 

//SYSPUNCH DD DSNAME=COMP. COBOL,DISP= (,CATLG) ,UNIT=2400 
//SYSIN DD * 

source statements 
/* 
// 



//SYS PRINT DD 



2. Compile -link edit (Assembler F) 

In the following example a source program is assembled and link 
edited. The source program is in the input stream (SYSIN). The 
object module is placed on temporary data set on direct access 
(SYSGO) and punched (SYSPUNCH). Channel separation is requested 
for the work data set. Output listings are requested. A cataloged 
user module library is required for the link edit step. The load 
module produced by the linkage editor is placed on a new 
partitioned data set named MODULE. The name of the load module is 
PROG1 . 



DD 
DD 
DD 



DD 



//EX2 

//ASM 

//SYSLIB 

//SYSUT1 

//SYSUT2 

//SYSUT3 

// 

//SYSPUNCH DD 

//SYSGO 

// 

//SYSIN 

source program 
/* 

//LE 
//SYSLIB 
//SYSUT1 DD 
//SYSPRINT DD 
//SYSLMOD DD 
// 
//SYSLIN DD 



JOB MSGLEVEL= ( 1, 1) 

EXEC PGM=IEUASM,PARM= (DECK, LOAD, LIST, XREF) 

DD DSNAME=SYS1.MACLIB,DISP=SHR 

UNIT=2314,SPACE=(400, (400,50)) 
UNTT=2314,SPACE=(400, (400,50)) 
UNIT=2314,SPACE=(400, (400,50)) , 
SEP= ( SYSUT1, SYSUT2 ) 
SYSOUT=B 

DSNAME=&&TEMP,DISP= (PASS) , 
UNIT=2311,SPACE=(TRK, (50,20)) 
* 



DD 



EXEC PGM=IEWL,PARM=(LIST,XREF) 

DD DSN=PVTMOD , DIS P=SHR 

UNIT=2311,SPACE=(1024, (50,20)) 
SYSOUT=A 

DSNAME=MODULE(PROGl),DISP=(CATLG), 
UNIT=2301,SPACE=(TRK, (50,, 1)) 
DSNAME=* . ASM. SYSGO,DISP=OLD 
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3. Compile -link edit-go (FORTRAN G) 

In the following example a FORTRAN G source program is compiled, 
link edited, and executed. The source program is in the input 
stream (SYSIN). The object module is placed on a temporary tape 
data set (SYSLIN) . 



The FORTRAN library is required for the link edit step. The load 
module is placed on a temporary partitioned data set named S6PDS. 
The name of the load module is MAIN. 



The program needs three data sets for execution 



r ■ : " 1 

//EX3 JOB , JONES 

//FG EXEC PGM=IEYFORT,PARM-(BCD,NODEC, ,LOAD) 

//SYSPRINT DD SYSOUT=A 

//SYSLIN DD DSNAME=SS0BJ,DISP=(, PASS), UNIT=2 400 

//SYSIN DD * 

source program 
/* 

//LE EXEC PGM=IEWLF440,PARM=(MAP,DCBS),COND=(4,LT,FG) 
//SYSLIB DD DSNAME=SYSl.FORTLIB,DISP=SHR 

DNIT=DISK,SPACE=(1024, (200, 20)) 

SYSOUT=A 

DSNAME= & SPDS ( MAIN) , DISP= (, PASS ) , 

UNIT= (2311,SEP=SYSUT1) , 

SPACE=(TRK, (100, 10,1), RLSE) ,DCB=BLKSIZE=3625 

DSNAME=* . FG. SYSLIN, DISP=OLD 
//GO EXEC PGM=*.LE.SYSLMOD 
//FT10F001 DD DSNAME=DATA,DISP=OLD,UNIT=2311,VOLUME=SER=FT9742! 

UNIT=2311,SEP=FT10F001),SPACE=(500, (20,10)) 

DSNAME=REPORT, DISP=(,KEEP), UNIT=2400, 

LABEL=(,NSL) 



//SYSUT1 DD 

//SYSPRINT DD 

//SYSLMOD DD 

// 

// 

//SYSLIN DD 



//FT11F001 DD 
//FT12F001 DD 
// 



L , - > 
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Link Edit-qo 



In the following example, the COBOL program compiled in Example 1 
is link edited and executed. The object program was placed in a 
cataloged data set named COMP. COBOL (SYSLIN) . The load module is 
placed on a temporary partitioned data set named £6LM. The name of 
the load module is TTW. The program needs four data sets for 
execution. The data set defined by the INPUT DD statement is three 
concatenated data sets. 



7934, MSGLEVEL= (1,0) 
EXEC PGM=LINKEDIT,PARM=(XREF,LIST, LET) 

DSNAME=SYSl.COBLIB,DISP=SHR 

UNIT=2311, V0LUME=SER=UTIL12, SPACE= (TRK, (10,10)) 

SYSOUT=A 

DSNAME=SSLM(TTW) , DISP= ( , PASS) , UNIT=231U , 

SPACE=(TRK, (15, ,1)) 

DSNAME=COMP . COBOL, DISP= (OLD, DELETE , KEEP) 
EXEC PGM=*.LK.SYSLMOD 

DSNAME=TRANS . DAY, DISP=MOD 

DSNAME=BACKUP , DISP=MOD , UNIT= ( 2 311 , P) , 

V0LUME=SER=(FILE11,FILE12, FILE13) ,SEP=MASTER 

SYSOUT=A 

DSNAME=LISTC, DISP=( OLD, DELETE), UNIT=24 00, 

VOLUME=SER=1234B2, LABEL= (, SUL) , SEP= (MASTER, COPY) 

DSNAME=FILE#2 , DISP=OLD, AFF=INPUT 

* 



| //EK4 


JOB 


| //LK 


EXEC 


| //SYSLIB 


DD 


| //SYSUT1 


DD 


| //SYSPRINT 


DD 


| //SYSLMOD 


DD 


1 // 




| //SYSLIN 


DD 


| //PROG 


EXEC 


| //MASTER 


DD 


| //COPY 


DD 


1 // 




| //PRINT 


DD 


| //INPUT 


DD 


1 // 




1 // 


DD 


1 // 


DD 


| input data 


1 /* 




1 // 





Go 

In the following example, the program compiled and link edited in 
Example 2 is executed. The program resides on a private library 
named MODULE (JOBLIB). The name of the program is PROG1. PROG1 
needs five data sets for execution. Note that PROG1 can accept 
PARM information because it was written in assembler language. 



r 1 

//EX 5 JOB 

//JOBLIB DD DSNAME=MODULE,DlSP=OLD 

//GOGO EXEC PGM=PR0G1,PARM=(SUMUP, FORMAT) 

//NEWDS1 DD DSNAME=GEORGE,DISP=(,KEEP),,UNIT=(2314,3), 

VOLUME= (PRIVATE, ,,5) ,SPACE=(CYL, (150,100)), 

DCB=(LRECL=600,BLKSIZE=6000) 

DSNAME=BRIEF. GEORGE, DISP=(,CATLG),UNIT=2301, 

VOLUME= SER= 230101, SPACE= ( TRK, (20,5)) 

UNIT=(2311,2),VOLUME=(,,,2) ,SPACE=(TRK, (100,100)) 

UNIT=24 , LABEL= ( , NL ) 

DDNAME=INPUT 

DSNAME=FILE, DISP=OLD 

DSNAME=LIST,DISP=OLD,UNIT=2400,VOLUME=SER=12345 

* 



// 
// 

//NEWDS2 DD 

// 

//WORK1 

//WORK2 

//OLDDS 

// 

// 

//INPUT 



DD 
DD 
DD 
DD 
DD 
DD 



/* 
// 



input data 
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Compile-load (ALGOL) 



In the following example, an ALGOL source program is compiled and 
loaded. The source program is in the input stream (SYSIN). The 
object module is placed on a temporary data set on direct access 
(SYSLIN). operations are suspended on the SYSPUNCH data set. 
SYSl.ALGLIB is needed for the load step. Three data sets required 
to execute your program are included in the load step. 



DD 
DD 



| //EX 6 
//A 

//SYSUT1 
//SYSUT2 
//SYSUT3 
//SYSABEND DD 
//SYSPRINT DD 
//SYSPUNCH DD 
//SYSLIN DD 
//SYSIN DD 

source program 
/* 

//LINK EXEC 
//SYSLIB DD 
//SYSLOUT DD 
//SYSLIN DD 
//SYSIN DD 
//SYSPRINT DD 
//ALGLDDOU DD 
// 
// 



JOB , MARIA 

EXEC PGM=ALGOL, PARM= (LOAD, ISO) 

DD UNIT=2400 

UNIT=2400, SEP=SYSUT1 

UNIT=2311,SPACE=(2000, (20,5)) 

SYSOUT=A 

SYSOUT=A 

DUMMY 

DSNAME=S&TEMP,DISP=(,PASS),SPACE=(TRK, (10,5)) 

* 



PGM=LOADER, PARM= • MAP, EP=IHIFSAIN* 

DSNAME=SYS1. ALGLIB, DISP=SHR 

SYSOUT=A 

DSNAME=*.A.SYSLIN,DISP=OLD 

DSNAME=SERIES , DISP=OLD 

SYSOUT=A 

DSNAME=GRID, DISP= ( ,KEEP) , UNIT=2314, 

VOLUME=PRIVATE,SPACE= (TRK, (200, 20 ) ,RLSE,ALX) 



Compile-compile-load (PL/I F) 



In the following example, two PL/I source programs are compiled and 
then combined and executed by the loader. The first source program 
resides in member SP10 of a partitioned data set named source. The 
second program resides in member SP11 of the same data set. The 
object modules are placed on separate temporary data sets. 
SYS1.PL1LIB is needed for all compile and load steps. The two data 
sets that contain the object modules are concatenated in the SYSLIN 
DD statement. Four data sets required to execute your program are 
included in the load step. 
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//EX7 

//PL1#1 

//SYSLIB 

//SYSUT1 

//SYSUT3 

//SYS PRINT 

//SYSLIN 

//SYSIN 

// 

//PL1#2 

//SYSLIB 

//SYSUT1 

//SYSPRINT DD 

//SYSLIN 

//SYSIN 

// 

//LOAD 

//SYSLIB DD 

//SYSLOUT DD 

//SYSLIN DD 

// DD 

//OUTPUT DD 

//TABLE DD 

//FILE DD 

//INPUT DD 



JOB , JONES 

EXEC PGM=IEMAA,PARM=(CHAR48,LOAD,NODECK) 

DD DSNAME=SYS1.PL1LIB,DISP=SHR 

DD UNIT=DISK,SPACE=(1024, (100,100)) 

DD UNIT=(DISK,SEP=SYSUT1) ,SPACE= (1024, (100,100)) 

DD SYSOUT=A 

DD DSNAME=&SOBJMOD,DISP= (,PASS) ,UNIT=2400 

DD DSNAME=SOURCE(SP10) ,DISP=OLD, UNIT=2314, 

VOLUME=SER=SORVOL 
EXEC PGM=IEMAA, PARM=(LOAD, NODECK) 
DD SYS1.PL1LIB,DISP=SHR 
DD DNIT=DISK,SPACE=(1024, (100,100)) 

SYSOUT=A 
DD DSNAME=SSOBJ,DISP=(,PASS),UNIT=2400 
DD DSNAME=SOURCE(SPll) ,DISP=OLD, 

VOLUME=REF=*.PLl#l. SYSIN 
EXEC PGM=LOADER , PARM= " MAP , EP=IHENTRY ' 

DSNAME=SYS1.PL1LIB,DISP=SHR 

SYSOUT=A 

DSNAME=*.PLl#l.SYSLIN,DISP=OLD 

DSNAME=* . PL1 #2 . SYSLIN , DI SP=OLD 

UNIT=1403,UCS=QN,DCB=(PRTSP=2,RECFM=F) 

DSNAME=TABLE. PARMS ,DISP=OLD 

DSNAME=MASTER, DISP=MOD 

* 



input data 



/* 
// 



8. Load 



In the following example, the COBOL program compiled in Example 1 
is loaded. The object program was placed in a cataloged data set 
named COMP. COBOL. The program needs four data sets for execution. 

Compare this example to Example 4. In both examples, the same 
program is prepared for execution and executed. These functions 
are performed in a load step in this example, and in link edit-go 
steps in Example 4. Note how the data sets defined with the four 
DD statements required for execution are different from those 
defined in Example 4. However, the four ddnames must be the same 
each time the program is executed. 



//EX 8 

//LOAD 

//SYSLIB 

//SYSLOUT 

//SYSLIN 

//MASTER 

//COPY 

//PRINT 

//INPUT 



JOB 2476,MSGLEVEL=(1,1) 

EXEC PGM=LOADER, PARM= (MAP , LET, CALL) 

DD DSNAME=SYSl.COBLIB,DISP=SHR 

DD SYSOUT=A 

DD DSNAME=COMP. COBOL, DISP=OLD 

DD DS NAME= ORDERS. WEEK, D I SP=MOD 

DD DSNAME=ARCHIVE , DIS P=MOD , S EP=MASTER 

DD SYSOUT=A 

DD * 



input data 



/* 
// 
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The following example shows the JCL statements required for the 
execution of a four-step job. This job accounts for received 
inventory items and outstanding purchase orders. 

The first step receives daily purchase receipts and purchase orders 
in card form (CARDIN) and transfers them to a passed temporary data 
set on tape (TRANS) . This step also checks the input cards for 
errors. If an error is found in a card, that card is punched out 
(ERROR) . Only the cards without errors are copied to tape (TRANS) . 
The contents of the tape are listed (PRINT). 

The second step uses the IBM sort/merge program to sort the input 
transactions according to inventory part number. The input 
transactions are in temporary tape data set passed from STEP1 
(SORTIN) the sorted transactions are produced on another temporary 
tape data set (SORTOUT) . 

The third step updates the product inventory. The new transactions 
are in the temporary data set passed from STEP2 (INPUT). They are 
compared against the latest inventory (OLDMASTR) and a new 
inventory is produced (NEWMASTR) . The inventories are generations 
of a generation data group. Two addiiional data sets are produced. 
The first one is a report of all erroneous purchases and purchase 
orders (ERRFILE) . The second one is a management report of the new 
inventory (REPORT) . 

The fourth step prints the error report and the management report 
produced in STEP3. 
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//DAILY JOB 7591A2B,ACCTDEPT,MSGLEVEL=(1,1) 

//JOBLIB DD DSNAME=ACCTNG. INVTRY, DISP=SHR 

//STEP1 EXEC PGM=CRDTP 

//TRANS DD DSNAME=S£SORTIN,DISP=(,PASS),UNTT=2400-3 

//ERROR DD SYSOUT=B 

//PRINT DD SYSOUT=A 

//CARDIN DD * 
input cards 

/* 

//STEP2 EXEC PGM=SORT,REGION=26K 

//SYSOUT DD SYSOUT=A 

DSNAME=SYS1. SORT LIB, DISP=SHR 

UNIT=2314,SPACE= (CYL, 5,, CONTIG) 

UNIT= (2314 ,SEP=SORTWK01) ,SPACE= (CYL, 5 , , CONTIG) 

UNIT= ( 2314, SEP=(SORTWK01, SORTWK02) ) , 

SPACE= ( CYL, 5, , CONTIG) 

UNIT= (2314,SEP=(SORTWK01, SORTWK02,SORTWK03) ) , 

SPACE= (CYL, 5, , CONTIG) 

UNIT=(2314,SEP=(SORTWK01,SORTWK02,SORTWK03, 

SORTWK04 ) ) ,SPACE= (CYL ,5 , , CONTIG) 

UNIT=(2314,SEP=(SORTWK01,SORTWK02,SORTWK03, 

SORTWK04 ,SORTWK05) ) , 

SPACE= (CYL, 5, , CONTIG) 

DSNAME=SSORTIN, DISP= (OLD, DELETE) , 

DCB=(RECFM=FB,LRECL=74,BLKSIZE=1850) 

DSNAME=&SORTOUT,UNIT=2400-3,DISP= (NEW, PASS) , 

DCB=(RECFM=FB,LRECL=74,BLKSIZE=1850) 

* 

sort control statements 
/* 

//STEP 3 EXEC PGM=UPDT 

//INPUT DD DSNAME=*.STEP2.SORTOUT,DISP=OLD 
DSNAME=INVEN. PARTS (0) ,DISP=OLD 

DSNAME=INVEN . PARTS ( +1 ) , DISP ( , CATLG) , UNIT=24 00-3 , 
VOLUME=SER=ACCT2 5 

DSNAME= && ERRORS, D IS P=(, PASS ),UNIT=2 311, 
SPACE=(CYL, (5,1)) 

DSNAME=S&MGT, DISP= ( , PASS) ,UNIT=2 311, 
SPACE= (CYL , ( 10 , 5) ) 
EXEC PGM=PRINT 

DD DSNAME=*.STEP3.ERRFILE,DISP=OLD 
DD DSNAME=*.STEP3. REPORT, DISP=OLD 
DD SYSOUT=D 



//SORTLIB DD 

//SORTWK01 DD 

//SORTWK02 DD 

//SORTWK03 DD 

// 

//SORTWK04 DD 

// 

//SORTWK05 DD 

// 

//SORTWK06 DD 

// 

// 

//SORTIN 

// 

//SORTOUT 

// 

//SYSIN 



DD 



DD 



DD 



//OLDMASTR DD 

//NEWMASTR DD 

// 

//ERRFILE 

// 

//REPORT 

// 

//STEP 4 

//ERR 

//REP 

//PRINT 



DD 



DD 
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10. The following example shows how orders are processed in a book 

club. The book club maintains its inventory of books on an indexed 
sequential data set named CLUB. CATALOG. The list of club members 
is maintained on another indexed sequential data set named 
CLUB. MEMBERS. Both data sets are kept in unloaded form on tape. 
The member's orders are on punched cards. Each card has the 
member's account number and the catalog number of the book 
selected. The purpose of the job is to: 

• Produce an order form for the stock room requesting the necessary 
number of books of each kind to be mailed out. 

• Print order forms for depleted books. 

• Update CLUB. CATALOG. 

• Punch a card that is both a mailing label and invoice for each 
club member who ordered a book. 

• Update CLUB. MEMBERS . 

The first step uses the IEBISAM utility program to load the 
CLUB. CATALOG data set from tape (SYSUTl) to 2314 volumes (SYSUT2) . 
In its unloaded form, CLUB. CATALOG resides in the latest member of 
a generation data group. 

The second step performs the same function for CLUB. MEMBERS. 

The third step transfers the customer orders from card (INPUT) to a 
passed temporary data set on tape (TAPE). The cards are also 
listed (PRINT). 

The fourth step uses the IBM sort/merge program to sort the input 
orders by catalog number of the book requested. The input orders 
are in the temporary tape data set passed from STEP3 (SORTIN). The 
sorted orders are produced on another temporary tape data set 
(SORTOUT). 

The fifth step compares the orderd (INBOOKS) to the CLUB. CATALOG 
data set (MASTER) . A listing is produced stating the number of 
books of each class needed and their location in the stockroom 
(SOLD) . If any books are depleted, or if there are less than 20 
books left, an order form is printed for that book (ORDERS). One 
work data set is needed (WORK). The CLUB. CATALOG data set is 
updated in place. 

The sixth step uses the IBM sort/merge program to sort the input 
orders by account number. The input orders are in the temporary 
data set passed from STEP3 (SORTIN) . The sorted orders are 
produced on another temporary data set (SORTOUT) . 

The seventh step compares the orders (INACCT) to the CLUB. MEMBERS 
data set (MASTER) . A card is punched for each order that is both a 
mailing label and an invoice (LABELS) . The cards also state the 
name of the book ordered so the stock clerks can attach them to the 
proper package. A management report of account activity is 
prepared (REPORT). This management report is stored on an existing 
partitioned data set and is listed at a later time when all monthly 
reports are ready. The CLUB. MEMBERS data set is updated in place. 
Two work data sets are needed (WORK1 and WORK2). 

The eighth step uses the IEBISAM utility program to unload the 
CLUB. CATALOG data set from 2314 volumes (SYSUTl) to a tape volume 
(SYSUT2). The unloaded data set becomes a member of a generation 
data group. 
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The ninth step performs the same function for CLUB . MEMBERS . 
Note ; Indexed sequential data sets are described in Appendix A. 



//ORDERS 

//JOBLIB 

//STEP1 

//SYSUT1 

//SYSUT2 

// 

// 

// 

// 



DD 



DD 



DD 



// 
// 
// 

//SYSPRINT DD 

//STEP2 

//SYSUT1 

//SYSUT2 

// 

// 

// 

// 

// 

// 

// 

// 

//SYSPRINT DD 

//STEP3 

//TAPE 



JOB DECEMBER6 9 , • S IMPLE BOOK CLUB ■ , MSGLEVEL= (1,1) 

DD DSNAME=CLUB.PROGLIB,DISP=SHR 

EXEC PGM=IEBISAM,PARM=LOAD 

DD DSNAME=CLUB. CATALOG (0) ,DISP=OLD 

DSNAME=CLUB. CATALOG (INDEX),, DISP= ( ,KEEP) , 

UNIT=2314,V0LUME=SER=222222,SPACE=(CYL,1) , 

DCB=(DSORG=IS,OPTCD=IR,KEYLEN=16,RKP=l) 

DSNAME=CLUB. CATALOG ( PRIME) , DISP= ( ,KEEP) , 

UNIT=2314, 2) VOLUME=SER= (111111,231403), 

SPACE= (CYL, 75) , DCB=* . SYSUT2 

DSNAME=CLUB. CATALOG (OVFLOW) , DISP= (,KEEP) , 

UNIT=2314,VOLUME=SER=222222,SPACE=(CYL,5), 

DCB=* . SYSUT2 

SYSOUT=A 

EXEC PGM=IEBISAM,PARM=LOAD 

DD DSNAME=CLUB . MEMBERS ( ) , DISP=OLD 

DSNAME=CLUB. MEMBERS (INDEX) ,DISP= ( ,KEEP) , 

UNIT=2314, VOLUME=SER=llllll,SPACE= (CYL,1) , 

DCB=(DS0RG=IS,0PTCD=YI,KEYLEN=4,RKP=4) 

DSNAME=CLUB. MEMBERS (PRIME) , DISP= ( ,KEEP) , 

UNIT=2314,V0LUME=SER=222222,SPACE=(CYL, (15)), 

DCB=* . SYSUT2 

DSNAME= CLUB. MEMBERS (OVFLOW) , DISP= ( ,KEEP) , 

UNIT=2314,VOLUME=SER=llllll,SPACE=(CYL, (1)) , 

DCB=*.SYSUT2 

SYSOUT=A 

EXEC PGMfCTOT 

DD DSNAME=&€SORTIN,DISP=(,PASS) ,UNIT=2400 



DD 



DD 



DD 



//PRINT DD UNIT=1443 

//INPUT DD * 
input cards 

/* 

EXEC PGM=SORT 

DD SYSOUT=A 
DD 



//STEPU 
//SYS OUT 
//SORTLIB 
//SORTWK01 DD 
//SORTWK02 DD 



//SORTWK03 DD 

// 

//SORTWK04 DD 

// 

//SORTWK05 DD 

// 

//SORTWK06 DD 

// 

// 

//SORTIN 

// 

//SORTOUT 

// 

// 

//SYSIN 



DD 



DD 



DD 



DSNAME=SYS1 . SORTLIB , DISP=SHR 

UNlT=2314,SPACE=(CYL,20 f ,CONTIG) 

UNIT= (2314,SEP=SORTWK01) , 

SPACE= (CYL, 20, ,CONTIG) 

UNIT= (2314,SEP=(SORTWK01^SORTWK02)) , 

SPACE= (CYL, 20, # CONTIG) 

UNIT=(2314,SEP=(SORTWK01,SORTWK02,SORTWK03)), 

SPACE= (CYL, 20, ,CONTIG) 

UNIT= ( 2314 , SEP= ( SORTWK01 , SORTWK0 2 , SORTWK0 3 , 

SORTWK0 4 ) ) , SPACE= ( CYL, 20, , CONTIG) 

UNIT= (2314 , SEP= (SORTWK01 , SORTWK0 2 , SORTWK03 , 

SORTWK04,SORTWK05) ) , 

SPACE= (CYL, 20, , CONTIG) 

DSNAME=&&SORTIN,UNIT=2400-3,DISP= (OLD, PASS) , 

DCB= (RECFM=FB, LRECL=114,BLKSIZE=114) ) , 

DSNAME=& &BOOKS ,UNIT=2314 , DISP= ( , PASS , DELETE) , 

SPACE= (CYL, 3) ,RLSE) , VOLUME=SER=llllll , 

DCB= (RECFM=FB, LRECL=114 ,BLKSIZE=114) 

* 



sort control statements 



/* 
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| //STEP5 


EXEC 


| //MASTER 


DD 


1 // 




1 // 




| //INBOOKS 


DD 


| //SOLD 


DD 


| //ORDERS 


DD 


| //WORK 


DD 


| //STEP6 


EXEC 


| //SYSOUT 


DD 


| //SORTLIB 


DD 


| //SORTWK01 


DD 


| //SORTWK02 


DD 


1 // 




| //SORTWK03 


DD 


1 // 




| //SORTWK04 


DD 


1 // 




| //SORTWK05 


DD 


1 / / 




| //SORTWK06 


DD 


1 // 




1 // 




| //SORTIN 


DD 


1 // 




| //SORTOUT 


DD 


1 // 




1 // 




| //SYS IN 


DD 


| sort 


confc] 


| /* 




| //STEP7 


EXEC 


| //MASTER 


DD 


1 // 




| //LABELS 


DD 


| //REPORT 


DD 


| //WORK1 


DD 


| //WORK2 


DD 


| //STEP 8 


EXEC 


| //SYS PRINT 


DD 


| //SYSUT1 


DD 


1 // 




1 // 




| //SYSUT2 


DD 


1 // 




j //STEP9 


EXEC 


| //SYSPRINT 


DD 


| //SYSUT1 


DD 


1 // 




1 // 




| //SYSUT2 


DD 


1 // 




1 // 





DSNAME=CLUB.CATALOG,DISP=OLD,UNIT= (2314, 3) , 
VOLUME=SER=( 222222, 111111, 231403), 
DCB=DSORG=IS 

DSNAME= * . STEP 4 . SORTOUT, DISP =OLD 
UNIT=1443 

UNIT= 140 3, UCS=(PCAN,, VERIFY) 
UNIT=2311,SPACE=(TRK, (20,5)) 
PGM=SORT 
SYSOUT=A 

DSNAME=SYS1. SORTLIB, DISP=SHR 
UNIT=2314,SPACE=(CYL,20,,CONTIG) 
UNIT= (2314,SEP=SORTWK01) , 
SPACE= (CYL,20, ,CONTIG) 
UNIT= ( 2314, SEP=SORTWK01, SORT WK02) ) , 
SPACE= (CYL,20, ,CONTIG) 

UNIT= ( 2314 , SEP=(SORTWK01, SORTWK0 2 , SORTWK03) ) , 
SPACE= (CYL, 20, ,CONTIG) 

UNIT= (2314 , SEP=(SORTWK01 ,SORTWK02 , SORTWK03, 
SORTWK04)),SPACE=(CYL, (2 0,,CONTIG) 
UNIT= (2314 ,SEP= (SORTWK01 ,SORTWK02 , SORTWK03, 
SORTWK04 , SORTWK05) ) 
SPACE=(CYL,20, ,CONTIG) 

DSNAME=SSSORTIN,UNIT=2400-3,DISP=(OLD,DELETE), 
DCB= (RECFM=FB, LRECL=114 ,BLKSIZE=114) ) 
DS NAME= S, 6ACCTS , UN IT= 2 31 4 , DI SP = ( , P ASS , DELETE ) , 
SPACE= (CYL, (3,1) ,RLSE) , VOLUME=SER=llllll, 
DCB= (RECFM=FB, LRECL=114,BLKSIZE=1140) 
* 
control statements 

PGM=BILLS 

DSNAME=CLUB. MEMBERS ,DISP=OLD,UNIT= (2314 , 2) 

VOLUME=SER=( 111111, 222222), DCB=DSORG=IS 

SYSOUT=B 

DSNAME=REPORT. DEC 69 (ORDERS) , DISP=MOD 

UNIT=2311,SPACE=(CYL, (10,1)) 

UNIT= (2311, SEP =WORKl),SPACE=( CYL, (10,2)) 

PGM=IEBISAM, PARM=UNLOAD 

SYSOUT=A 

DSNAME=CLUB. CATALOG, DISP= (OLD, DELETE, KEEP) , 

UNIT= ( 2314 , 3) , VOLUME=SER= (222222, 111111 , 

231403) ,DCB=DSORG=IS 

DSNAME=CLUB. CATALOG ( +1) , DISP=( , CATLG ) , 

UNIT=2400,VOLUME=SER=T79321 

PGM=IEBISAM, PARM=UNLOAD 

SYSOUT=A 

DSNAME=CLUB. MEMBERS, DISP= (OLD, DELETE, KEEP) , 

UNIT= (2314,2) ,VOLUME=SER= (111111, 222222), 

DCB=DSORG=IS 

DSNAME=CLUB. MEMBERS (+1) , DISP=( , CATLG) , 

UNIT=2400,VOLUME=SER=T89425 
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Part IV: Cataloged and In-stream Procedures 



A cataloged procedure is a set of job control statements that has been 
assigned a name and placed in a partitioned data set known as the 
procedure library. (The IBM- supplied procedure library is named 
SYS1.PR0CLIB; at your installation, there may be additional procedure 
libraries which would have different names.) An in-stream procedure is 
a set of job control statements in the form of cards that have been 
placed in the input stream of a card reader. An in-stream procedure can 
be executed any number of times during the job in which it appears. 
Both cataloged and in-stream procedures statements that has been placed 
in the procedure library can consist of one or more steps; each step is 
called a procedure step. Each procedure step consists of an EXEC 
statement and DD statements. The EXEC statement identifies to the 
system what program is to be executed. The DD statements define the 
data sets to be used by the program. 

You can use a cataloged procedure by coding the procedure name on an 
EXEC statement. You can use an in-stream procedure by coding the 
procedure name that is on the PROC statement on an EXEC statement. With 
both cataloged and in-stream procedures, you can follow this EXEC 
statement with DD statements that modify the procedure for the duration 
of the job step. 

Part IV consists of two chapters. The first chapter, "Using 
Cataloged and In-stream Procedures" describes how to call a procedure, 
how to assign values to symbolic parameters, how to override parameters 
on the EXEC and DD statement, and how to add DD statements to a 
procedure. The second chapter, "Writing Procedures: Cataloged and 
In-stream" the makeup of a procedure, how to use symbolic parameters, 
how to place a set of job control statements in the procedure library, 
and how to modify a procedure. 

Note ; This section is essentially the same as Appendix A of the 
publication IBM System/360 Operating System; Job Control Language 
Reference . It is presented in both publications for the sake of 
completeness . 
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Using Cataloged and In-stream Procedures 



How to Call a Cataloged Procedure 

To use a cataloged procedure, submit a JOB statement followed by an EXEC 
statement. On the EXEC statement you identify the cataloged procedure 
in one of two ways: 

1. Code, as the first operand, the name assigned to the procedure; or 

2. Code PROC= followed by the name assigned to the procedure as the 
first operand. 

When you call a procedure, the system finds the control statements in 
the prodecure library and then executes the programs identified on the 
EXEC statements in the procedure. 

Besides identifying the procedure on the EXEC statement, you can 
assign values to symbolic parameters and override parameters that are 
coded on the EXEC statements contained in the procedure. You follow the 
EXEC statement with DD statements when you want to override DD 
statements in the procedure or add DD statements to the procedure. 

When a cataloged procedure is written as part of the system output 
listing (i.e., MSGLEVEL= ( 1 , ) , MSGLEVEL=(1, 1), or MSGLEVEL=1 is coded on 
the JOB statement), the procedure statements can be easily identified. 
An XX appears in columns 1 and 2 of a procedure statement that you did 
not override; X/ appears in in columns 1 and 2 of a procedure statement 
that you did override; XX* appears in columns 1 through 3 of a procedure 
statement, other than a comment statement, that the system considered to 
contain only comments; and *** appears in columns 1 through 3 of a 
comment statement. In addition, if the procedure contains symbolic 
parameters, the output listing will show the symbolic parameters and the 
values assigned to them. 

How to Call an In-stream Procedure 

To use an in-stream procedure, submit a JOB statement followed by the 
in-stream procedure to be used. The in-stream procedure can appear 
immediately following the JOB statement, the JOBLIB DD statement, or the 
SYSCHK DD statement. The in-stream procedure cannot appear before the 
JOB statement or after the EXEC statement that calls it. An in-stream 
procedure can appear after a SYSIN DD * statement; however, this is not 
advisable because of the allocation of a data set when SYSIN DD * is 
specified. 

To call the procedure, you identify the in-stream procedure on an 
EXEC statement in one of two ways : 

1. Code, as the first operand, the name on the PROC statement of the 
procedure; or 

2. Code PROC= followed by the name on the PROC statement of the 
procedure . 

When you call an in-stream procedure, the system finds the control 
statements that have been written on a direct access device and then 
executes the programs identified on the EXEC statements of the 
procedure. 
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Besides identifying the procedure on the EXEC statement, you can 
assign values to symbolic parameters and override parameters that are 
coded on the EXEC statements contained in the procedure. You follow the 
EXEC statement with BD statements when you want to override DD 
statements in the procedure or add DD statements to the procedure. 

When an in-stream procedure is written as part of the system output 
listing (i.e., MSGLEVEL=(1,0) , MSGLEVEL(1,1) , MSGLEVEL=1 or MSGLEVEL=2 
is coded on the JOB statement), the procedure statements can be easily 
identified. An ++ appears in columns 1 and 2 of a procedure statement 
that you did not override; +// appears in columns 1 through 3 of a 
procedure statement that you did override; ++* appears in columns 1 
through 3 of a procedure statement, other than a comment statement, that 
the system considered to contain only comments; and *** appears in 
columns 1 through 3 of a comment statement. In addition, if the 
procedure contains symbolic parameters and you assign values to these on 
the EXEC statement that calls the procedure, the output listing will 
show the symbolic parameters and the values assigned to them. 



Assigning Values to Symbolic Parameters 



The cataloged procedure you call may contain symbolic parameters. A 
symbolic parameter is characterized by a name preceded by an ampersand 
(£) and appears in the operand field of a cataloged procedure statement 
or a DD statement used to override a DD statement in the procedure. A 
symbolic parameter stands as a "symbol for a parameter, a subparameter, 
or a value. Symbolic parameters are used so that the procedure can be 
modified easily when it is called by a job step. 

The following are examples of symbolic parameters: 

//STEP1 EXEC PGM=COB, PARM= ' PI, SP 2, P 3 ' 

//DD1 DD DSNAME=FIX, UNIT= S DEVICE , SPACE= (CYL , U SPACE , 10) ) 

//DD2 DD DSNAME=CHAG . UNIT= 2400, DCB=BLKSI ZE= 6LENGTH 

Symbolic parameters must either be assigned values or nullified 
before the procedure is executed. There are two ways that a symbolic 
parameter can be assigned a value: 



1. You assign a value to the symbolic parameter on the EXEC statement 
that calls the procedure. 

2. The PROC statement, which can appear as the first statement in a 
cataloged procedure and must appear as the first statement in an 
in-stream procedure, assigns a default value to the symbolic 
parameter. 

Any default value assigned to a symbolic parameter on the PROC statement 
is overridden when you assign a value to the same symbolic parameter on 
the EXEC statement that calls the procedure. 

If the cataloged procedures contain symbolic parameters, the 
installation should provide you with a list of the symbolic parameters 
used, what meaning is associated with each symbolic parameter, and what 
default value has been assigned to each of the symbolic parameters on 
the PROC statement. (The PROC statement is optional for cataloged 
procedures; therefore, there may be no default values assigned to the 
symbolic parameters used in a cataloged procedure.) You need this 
information to determine what the symbolic parameter represents and to 
decide whether to use the default value or to assign a value to the 
symbolic parameter on the EXEC statement that calls the procedure. 
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To assign a value to a symbolic parameter, you code on the EXEC 
statement that calls the procedure: 

symbolic parameter=value 

Omit the ampersand that precedes the symbolic parameter. For example, 
if the symbolic parameter SNUMBER appears on a DD statement in the 
procedure, code 

NUMBER= value 

on the EXEC statement that calls the procedure. Any value you assign to 
a symbolic parameter is in effect only during the current execution of 
the procedure. 

There are some rules you should keep in mind as you assign values to 
symbolic parameters: 

1. The value you assign can be any length, but it cannot be continued 
onto another statement. 

2. If the value contains special characters, enclose the value in 
apostrophes (the enclosing apostrophes are not considered part of 
the value). If the special characters include apostrophes, each 
must be shown as two consercutive apostrophes. 

3. If, on the EXEC statement, you assign more than one value to a 
symbolic parameter, the first value encountered is used. 

4. If the symbolic parameter is concatenated with some other 
information (e.g., 6JOBN0.321), this information and the value you 
assign to the symbolic parameter cannot exceed a combined total of 
120 characters. 

5. If the symbolic parameter is a positional parameter followed by 
other parameters in the statement, it should be delimited in the 
procedure by a period instead of a comma. Then, if the parameter 
is nullified on the PROC statement or on an EXEC statement calling 
the procedure, the statement containing the symbolic parameter will 
not begin with a comma. The system recognizes the period as a 
delimiter; the period does not appear in the statement when you 
nullify or assign a value to the symbolic parameter. When you do 
assign a value to a symbolic parameter that is a positional 
parameter, you should follow the value with a comma; the value must 
then be enclosed in apostrophes since a comma is a special 
character . 

For example, in the following DD statement contained in a cataloged 
procedure named EXAMPLE, SPOSPARM represents a positional 
parameter. 

//DEFINE DD 6POSPARM.DSN=ATLAS,DISP=OLD 

To replace the symbolic parameter SPOSPARM with the parameter 
DUMMY, you would code on the EXEC statement calling the procedure: 

//DOTHIS EXEC EXAMPLE, POSPARM=* DUMMY, • 

When the cataloged procedure named EXAMPLE is executed, the DD 
statement named DEFINE appears as: 

//DEFINE DD DUMMY, DSN= ATLAS, DISP=OLD 
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Note: Do not confuse positional parameters with positional 

subparameters. For a list of the positional parameters you can 

code on the DD statement, see "Positional and Keyword Parameters' 
in the section on the DD statement. 



NULLIFYING A SYMBOLIC PARAMETER 

Besides assigning values to symbolic parameters, you can nullify a 
symbolic parameter, i.e., tell the system to ignore the symbolic 
parameter. 

To nullify a symbolic parameter, code on the EXEC statement that 
calls the procedure: 



symbolic parameter= 

Omit the ampersand that precedes the symbolic parameter and do not 
follow the equal sign with a value. 

For example, if a DD statement in a procedure named TIMES is 

//DD8 DD UNIT=1403,UCS=SUCSINFO 

and you want to nullify the symbolic parameter SUCSINFO, you would code 

//CALL EXEC TIMES, UCSINFO= 
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Example of Assigning Values to Symbolic Parameters 

1. The following are the first four statements of a cataloged 
procedure named ASSEMBLE that contains symbolic parameters. The 
PROC statement assigns a default to the symbolic parameter 60BJECT 
and nullifies the symbolic parameter SLIST. Notice that the 
symbolic parameter SDEPT is not assigned a value on the PROC 
statement; therefore, the job step that calls this procedure must 
assign a value to fiDEPT. 

//DEF PROC OBJECT=NODECK,LIST= 

//ASN EXEC PGM=IEUASM,PARM=(LINECNT=50,SLIST.LIST,&OBJECT) 

//SYSLIB DD DSNAME=SYS1.MACLIB,DISP=0LD 

// DD DSNAME=LIBRARY.SDEPT.MACS # DISP=OLD 

When you call this procedure, you can assign values to the symbolic 
parameters by coding: 

//STEP3 EXEC ASSEMBLE, DEPT=D 82, OB JECT=DECK 

The value assigned to SOBJECT in this EXEC statement overrides the value 
assigned to SOBJECT in the PROC statement. Since no value is assigned 
to SLIST in this EXEC statement, LIST is nullified — because that is 
the default specified in the PROC statement. 

While the procedure is being executed, the first four statements of 
this procedure would appear as shown below. 

//DEF PROC 0BJECT=N0DECK,LIST= 

//ASM EXEC PGM=IEUASM,PARM=(LINECNT=50, LIST, DECK) 

//SYSLIB DD DSNAME=SYS1.MACLIB,DISP=0LD 

// DD DSNAME=LIBRARY.D82MACS,DISP=OLD 

The above example applies to in-stream procedures as well as cataloged 
procedures. However, you must refer to the name on the PROC statement 
of the in-stream procedure when calling the procedure. 

2. The following is an in-stream procedure that contains symbolic 
parameters. The PROC statement marks the beginning of the 
in-stream procedure and in this example assigns defaults to 
symbolic parameters SD,£U,£V, and SS. The procedure is named 
INSTREAM. 

//INSTREAM PROC D=* (NEW,CATLG) ' ,U=2311 ,V=' SER=66655' , S=' (TRK, (1, 1, 1) ) 

//INI EXEC PGM^EWL^ARM^XREF^ISTrfNCAL* 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSNAME=UTC,DISP=OLD,UNIT=2311,VOLUME=SER=66651 

//SYSLIN DD DSNAME=UTE,DISP=OLD,UNIT=2311,VOLUME=SER=66652 

//SYSLMOD DD DSNAME=&SLOAD, DISP=6D,UNIT=SU, VOLUME=SV, SPACE=SS 

// PEND 

When you call this procedure, you must code the name on the PROC 
statement on the EXEC statement. You can assign values to the symbolic 
parameters by coding: 

//CALL EXEC INSTREAM, D=* (NEW, PASS)*, V= , SER=6 6653 ■ 

The values assigned to €D and SV in this EXEC statement override the 
values assigned to these symbolic parameters in the PROC statement. 

Since nO value is assigned to SU or &S # the defaults specified on the 
PROC statement are used when the procedure is executed. 
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While the procedure is being executed, it would appear as shown 
below. 

//INSTREAM PROC D=' (NEW,CATLG) ' , U=2311,V= • SER=66655' , S=* (TRK, (1,1, 1) ) 

//INI EXEC PGM=IEWL, PARM= *XREF, LIST, NCAL' 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSNAME=UTC,DISP=OLD,UNIT=2311,VOLUME=SER=66651 

//SYSLIN DD DSNAME=UTE,DISP=0LD,UNIT=2311,V0LUME=SER=66652 

//SYSLMOD DD DSNAME=&&LOAD, DISP= (NEW, PASS) ,UNIT=2311, 

// VOLUME=SER=66653,SPACE=(TRK, (1,1,1)) 

The PEND statement is printed but is not executed. 

3. The following are the first four statements of a cataloged 

procedure named TEST that contains symbolic parameters. The PROC 
statement nullifies the symbolic parameter SDUM1 and assigns a 
default value to the symbolic parameter &DUM2. 

//TEST PROC DUM1=,DUM2=* DUMMY, ' 

//STEP1 EXEC PGM=IEFBR14 

//DD1 DD &DUMl.DSN=ABLE,DISP=OLD 

//DD2 DD £ DUM2 . DSN= BAKER, DISP=OLD 

&DUM1 and &DUM2 are positional parameters. They are delimited by a 
period so that, if they are nullified, the DD statement does not begin 
with a comma. The system recognizes the period as a delimiter; the 
period does not appear in the statement when you nullify or assign a 
value to the symbolic parameter. The value assigned to DUM2 in the PROC 
statement is followed by a comma so that a comma will delimit the value 
when it appears in the statement in the procedure. The value must be 
enclosed in apostrophes because the comma is a special character. 

When you call this procedure, you can reverse the default values on the 
PROC statement so that the DD statement named DD1 defines a dummy data 
set and the DD statement named DD2 defines an existing data set: 

//STEPUP EXEC TEST, DUM1= • DUMMY, • , DUM2= 

The value assigned to 6DUM1 on the EXEC statement overrides the 
nullification of SDUM1 on the PROC statement. &DUM2 is nullified on 
this EXEC statement, so the value assigned to &DUM2 on the PROC 
statement is ignored. 

While this procedure is being executed, the first four statements will 
appear as shown below: 



//TEST PROC DUMl=,DUM2=* DUMMY, " 

//STEP1 EXEC PGM=IEFBR14 

//DD1 DD DUMMY, DSN= ABLE, DISP=OLD 

//DD2 DD DSN=BAKER,DISP=OLD 
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Overriding, Adding, and Nullifying Parameters on an 
EXEC Statement 

You can override, add, or nullify parameters coded on EXEC statements 
contained in a cataloged procedure. You make these changes on the EXEC 
statement that calls the procedure. You should override parameters only 
when you want to change their values. Do not override parameters to 
correct syntactical errors in the procedure. You cannot change the PGM 
parameter. The changes you make are in effect during the current 
execution of the procedure. 

OVERRIDING EXEC STATEMENT PARAMETERS 

To override an EXEC statement parameter in a procedure, identifying on 
the EXEC statement that calls the procedure the parameter you are 
overriding, the name of the EXEC statement on which the parameter 
appears, and the change to be made. The format required to override a 
parameter is : 

parameter . procstepname= change 

For example, if one of the EXEC statements in the procedure named FILL 
is: 

//STEP3 EXEC PGM=DEF,REGION=100K 

and you want to change REGION=100K to REGION=80K, you would code: 

//CALL EXEC FILL, REGION. STEP3= 8 OK 

You can change more than one EXEC statement parameter in the 
procedure. For example, if one of the EXEC statements in the procedure 
name JKW is : 

//STEP2 EXEC PGM=OUT,TIME=(2,30),REGION=120K 

and you want to change TIME=(2,30) to TIME=4 and REGION=120K to 
REGION=200K, you would code: 

//STEP 3 EXEC JKW, TIME. STEP2=4, REGION. STEP 2= 20 OK 

If you want to change different parameters that appear on different 
EXEC statements in the procedure, you must code all overriding 
parameters for one procedure step before those for the next step. For 
example, if the first three EXEC statements in a procedure named DART 
are: 

//STEP1 EXEC PGM=JCTSB,PARM='*14863\,REGION=100K 
//STEP2 EXEC PGM=JCTRC,REGION=80K 
//STEP3 EXEC PGM=JCTQD,COND=(8,LT),TIME=3 

and you want to override the PARM and REGION parameters on the first 
EXEC statement, the REGION parameter on the second EXEC statement, and 
the TIME parameter on the third EXEC statement, the EXEC statement that 
calls the procedure would appear as: 

//STEPC EXEC DART, PARM. STEP1= * ♦86348 1 , 

// REGION. STEP1=120K, REGION. STEP2=100K, 

// TIME.STEP3=(4,30) 
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You can code an EXEC statement parameter and omit the term 
"procstepname." When you do this, the procedure is modified as follows: 

• If the PARM parameter is coded, it applies only to the first 
procedure step. If a PARM parameter appears in a later EXEC 
statement, it is nullified. 

• If the TIME parameter is coded, it applies to the total procedure. 
If the TIME parameter appears on any of the EXEC statements in the 
procedure, it is nullified. 

• If any other parameter is coded, it applies to every step in the 
procedure. If the parameter appears on an EXEC statement, it is 
nullified; if the parameter does not appear on an EXEC statement, it 
is added. 

For example, assume the EXEC statements in a procedure named RYIN are: 

//STEP1 EXEC PGM=SECT,PARM=140947,REGION=100K 
//STEP2 EXEC PGM=PARA,PARM=105600,COND=EVEN 
//STEP3 EXEC PGM=SENT,PARM=L1644,REGION=80K 

If you want to override the PARM parameter in the first procedure step, 
nullify all other PARM parameters in the procedure, and have all 
procedure steps assigned the same region size, the EXEC statement that 
calls the procedure would appear as: 

//SPAA EXEC RYINPARM=L1644,REGION=136K 

While the procedure named RYIN is being executed, these three EXEC 
statements would appear as: 

//STEP1 EXEC PGM=SECT,PARM=L1644,REGI0N=136K 
//STEP2 EXEC PGM=PARA,COND=EVEN,REGION=136K 
//STEP3 EXEC PGM=SENT,REGION=136K 



ADDING EXEC STATEMENT PARAMETERS 

To add a parameter to an EXEC statement in the procedure, identify on 
the EXEC statement that calls the procedure the parameter you are 
adding, the name of the EXEC statement to which you want to add the 
parameter, and the value you are assigning to the parameter. The format 
required to add a parameter is: 

parameter . procstepname=value 

Parameters you are adding and overriding for a step must be coded before 
those parameters you are adding and overriding for the next step. 

For example, if the first two EXEC statements of a procedure named 
GLEAN are: 

//STEP1 EXEC PGM=FAC,C0ND=(8,LT) 
//STEP2 EXEC PGM=UP,PARM=377685 

and you want to override the COND parameter and add the ROLL parameter 
to the first EXEC statement, and add the REGION parameter to the second 
EXEC statement, the EXEC statement that calls the procedure would appear 
as: 

//STPA EXEC GLEAN, COND. STEP1=( 12, LT) , 

// ROLL. STEP1= (NO, NO) , REGION. STEP2=88K 
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NULLIFYING EXEC STATEMENT PARAMETERS 

To nullify a parameter on an EXEC statement in the procedure, identify, 
on the EXEC statement that calls the procedure, the parameter you want 
to nullify and the name of the EXEC statement on which the parameter 
appears . The format required to nulif y a parameter is : 

parameter. procstepname= 

Parameters that you are nullifying, overriding, and adding to a step 
must be coded before those for the next step. 

For example, if the first two EXEC statements of a procedure named 
GINN are: 

//STEPl EXEC PGM=INV,PARM='146,899 , ,RD=R 
//STEP2 EXEC PGM=DET,PARM=XYA34,COND=(80,GT) 

and you want to nullify the PARM parameter and add the COND parameter to 
the first EXEC statement, and override the COND parameter on the second 
EXEC statement, the EXEC statement that calls the procedure would appear 
as: 

//STEPY EXEC GINN,PARM.STEP1=,C0ND.STEP1=(25,EQ), 
// COND.STEP2=(80,GE) 



Example of Overriding, Adding, and Nullifying Parameters on an 
EXEC Statement 



1. You want to call the following cataloged procedure named ESEAP: 

r 

| //STEPA EXEC PGM=FLIER,PARM=7121190,ACCT=(4805,UNASGN) 

//DDA DD DSNAME=LIBRARY.GROUP67,DISP=OLD 

//DDB DD DSNAME=STAND.FIVE,DISP=OLD 

//STEPB EXEC PGM=VERSE,DPRTY=(11,13),PARM=780684,RD=R 

//DDC DD UNIT=2311, SPACE= (TRK, ( 10, 2) ) 

//DDD DD DSNAME=C0L,DISP=0LD 

//DDE DD DDNAME=IN 

L J 

You want to make the following modifications to the procedure: 

• Add the REGION parameter to both EXEC statements. 

• Add the DPRTY parameter to the first EXEC statement. 

• Override the ACCT parameter on the first EXEC statement. 

• Nullify the RD parameter on the second EXEC statement. 

• Add the COND parameter to the second EXEC statement. 

The EXEC statement that calls the procedure would appear as: 

//MINC EXEC ESEAP,REGION=86K,DPRTY.STEPA=(ll,13), 

// ACCT.STEPA=(4 805,7554),RD.STEPB=,COND.STEPB=(60,LE) 

The two EXEC statements in the procedure would appear as shown below 
while the procedure is being executed. These modifications do not 
appear on an output listing. 

//STEPA EXEC PGM= FLIER, PARM=7121190,ACCT= (4805, 7554), 

// REGION=86K,DPRTY=(ll, 13) 

//STEPB EXEC PGM=VERSE,DPRTY=(11,13),REGION=86K,COND=(60,LE) 
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2. You want to call the following in-stream procedure named INLINE: 



PGM=COMP,ACCT= (7037,2361) ,REGION=86K 

DSNAME= INFORM, DISP=OLD, UNIT=2311, VLOLUME=SER=75250 

DSNAME=LCJWC,DISP=OLD,UNIT=2311,VOLUME=SER=76250 

PGM=CHECKS, PARM=212334,COND=( 50, LE),ACCT= (2001, 0539) 

DSNAME=PAY , DISP=OLD , UNIT=2311 , VOLUME=SER= MEMORY 

DSNAME=INCREAS,DISP=OLD,UNIT=2311,VOLUME=SER=33333 



| //INLINE 


PROC 


| //STEP1 


EXEC 


| //DD1 


DD 


| //DD2 


DD 


j //STEP2 


EXEC 


| //DD3 


DD 


| //DD4 


DD 


1 // 


PEND 



You want to make the following modifications to the procedure: 

• Add DPRTY parameter to both EXEC statements. 

• Nullify the REGION parameter on the first EXEC statement. 

• Override the ACCT parameter on the second EXEC statement. 
The EXEC statement that calls the procedure would appear as: 

r ■ 

| //CALLER EXEC INLINE, DPRTY= (11, 13) .REGION. STEP1=, ACCT. STEP2= (4710, 
| // 5390) 

L 

The two EXEC statements in the procedure would appear as shown below 
while the procedure is being executed. These modifications do not 
appear on an output listing. 



| //STEP1 
| //STEP2 

L 



EXEC PGM=COMP, ACCT= (7037, 2361) , DPRTY= (11,13) 
EXEC PGM=CHECKS,PARM=212334,COND=(50,LE),DPRTY=(11, 13) , 
ACCT=(4710,5390) 



Overriding, Adding, and Nullifying Parameters on a DD Statement 

You can override, add, or nullify parameters coded on a DD statement 
contained in a cataloged procedure. You make these changes at the time 
the procedure is called; these changes are in effect during the current 
execution of the procedure. Use one DD statement to override, add, and 
nullify parameters on the same DD statement in the procedure. 

OVERRIDING DD STATEMENT PARAMETERS 

To override a parameter on a DD statement in the procedure, you must 
include a DD statement following the EXEC statement that calls the 
procedure. The ddname of this DD statement must identify the DD 
statement that contains the parameter you are overriding and the 
procedure step in which the DD statement appears. Code, in the operand 
field of this DD statement, the parameter you are overriding and the 
change; or code a mutually exclusive parameter that is to take the place 
of a parameter. The format required for a DD statement following the 
EXEC statement is: 



or 



//procstepname. ddname DD parameter=change 

//procstepname. ddname DD mutually exclusive parameter=value 
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For example, if one of the DD statements in a procedure step named 
STEPU is: 

//DD2 DD DSNAME=ABIN,DISP=OLD,VOLUME=SER=54 896,UNIT=2400 

and you want to change UNIT=2400 to UNIT=180, you would code: 

//STEP4.DD2 DD UNIT=180 

When you code a mutually exclusive parameter on an overriding DD 
statement, the system replaces the parameter on the specified DD 
statement with the mutually exclusive parameter. For example, the 
parameters SYSOUT and DISP are mutually exclusive parameters. If one of 
the DD statements in a procedure step named PRINT is: 

//DD8 DD SYSOUT=C 

and you do not want the data set printed, you would code: 

//PRINT. DD8 DD DUMMY, DISP= (NEW, DELETE) 

You have replaced the SYSOUT parameter with the DISP parameter, and 
added the DUMMY parameter. (The DUMMY parameter causes this DD 
statement to define a dummy data set.) 

You can change more than one parameter that appears on a DD statement 
in the procedure. For example, if one of the DD statements in a 
procedure step named STEP5 is : 

//DDX DD DSNAME=FIES,DISP=OLD,UNIT=2400-2,VOLUME=REF=*.STEP2.DDC 

and you want this DD statement to define a new data set, you would code: 

//STEP5.DDX DD DSNAME=RVA1 ,DISP=( NEW, KEEP) 

If you want to change parameters that appear on different DD 
statements in the same procedure step, the overriding DD statements must 
be in the same order in the input stream as the corresponding DD 
statements in the procedure step. For example, if the first step of a 
procedure named AJG is: 

//STEP1 EXEC PGM=MGR,REGION=80K 

//DD1 DD DSNAME=LONE,DISP= (NEW, DELETE) ,UNIT=2400,VOLUME=SER=568998 

//DD2 DD UNIT=TAPE 

//DD3 DD UNIT=2311,DISP= (, PASS), SPACE= (TRK, (20,2)) 

and you want to change the UNIT and VOLUME parameters on the first DD 
statement and the SPACE parameter on the third DD statement, you would 
code: 

//CATP EXEC AJG 

//STEP1.DD1 DD UNIT=2400-3,VOLUME=SER=WORK18 

//STEP1.DD3 DD SPACE=(CYL, (U,D) 

If you want to change parameters that appear in different procedure 
steps in the cataloged procedure you are calling, the overriding DD 
statements must be in the same order as are the procedure steps. 
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The DC£ Parameter ; If you want to change some of the subparameters in 
the DCB parameter, you need not recode the entire DCB parameter. 
Instead, code only those subparameters that you are changing and any 
mutually exclusive subparameters that are to replace particular 
subparameters. For example, if one of the DD statements in a procedure 
step named NED is: 

//DD3 DD DSNAME=PER,DISP= (, KEEP), UNIT=2311,SPACE=(TRK, (88,5)), 
// DCB=(BUFNO=1,BLKSIZE=80,RECFM=F,BUFL=80) 

and you want to change BLKSIZE=80 to BLKSIZE=320 and BUFL=80 to 
BUFL=320, you would code: 

//NED.DD3 DD DCB= (BLKSIZE=320, BUFL=320) 

The DCB subparameters BUFNO and RECFM remain unchanged. 

When you are overriding a procedure DD statement that contains a DCB 
parameter and the overriding DD statement uses a backward reference to 
copy the DCB information on an earlier DD statement, the DCB information 
on the procedure DD statement overrides any of the corresponding 
subparameters that are copied. For example, if one of the DD statements 
in a step named NED of a procedure named CATROC is: 

V/DD5 DD DSNAME=PER,UNIT=2311,SPACE=(TRK, (88,5)), 
// DCB= (BLKSIZE=640 ,RECFM=FB) 

and you have in your input stream: 

//STP1 EXEC PGM=A 

//DD1 DD DSN=AIR, UNIT= 2311, SPACE=(TRK, (10,1)), 

// DCB=(BLKSIZE=320,RECFM=FBA,BUFL=320) 

//STP2 EXEC CATROC 

//NED.DD5 DD DCB=*.STP1.DD1 

The DD statement DD5 in cataloged procedure would appear as shown below 
while the procedure is being executed. This modification does not 
appear on output listing. 

//DD5 DD DSNAME=PER,UNIT=2311,SPACE=(TRK, (88,5)), 
// DCB=(BLKSIZE=640,RECFM=FB,BUFL=320) 

If you want to override a DD statement that contains a dsname 
positional subparameter in the DCB parameter, you must recode the dsname 
subparameter, even though you do not want to change it. For example, if 
one of the DD statements in a procedure step named BANK is: 

//DD5 DD DSNAME=SAVE,DISP= (NEW, KEEP) ,UNIT=2311, 

// SPACE=(CYL, (12,2)),DCB=(ACCNT,BUFNO=5,KEYLEN=2) 

and you want to change BUFNO=5 to BUFNO=3 , you would code: 

//BANK.DD5 DD DCB=(ACCNT, BUFNO=3) 

Both the dsname ACCNT and KEYLEN subparameters remain unchanged. You 
must code ACCNT on the overriding DD statement. 
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ADDING DD STATEMENT PARAMETERS 

To add a parameter to a DD statement in the procedure, you must include 
a DD statement following the EXEC statement that calls the procedure. 
The ddname of this DD statement must identify the DD statement to which 
you are adding a parameter and the procedure step in which the DD 
statement appears. Code, in the operand field of this DD statement, the 
parameter you are adding. The format required for a DD statement 
following the EXEC statement is: 

//procstepname. ddname DD parameter=value 

For example, if one of the DD statements in a procedure step named 
STPTWO is: 

//DDM DD DSNAME=TYPE,DISP=(,KEEP),UNIT=2400 

and you want to add the VOLUME parameter, you would code: 

//STPTWO. DDM DD VOLUME=SER=569433 

If you want to add parameters or change parameters that appear on 
different DD statements, the overriding DD statements must be in the 
same order in the input stream as the corresponding DD statemetns in the 
procedure . 



NULLIFYING DD STATEMENT PARAMETERS 

There may be parameters on a DD statement that you do not want to 
override, but you want the system to ignore. Also, when you modify a DD 
statement in a procedure by overriding certain parameters or adding 
parameters, there may be some parameters remaining that no longer have 
meaning for your data set definition but would effect processing of the 
data set. To temporarily remove these parameters, you can nullify them. 
(If you are replacing a parameter with a mutually exclusive parameter, 
do not nullify the parameter that is being replaced.) 

To nullify a parameter on a DD statement in the procedure, you must 
include a DD statement following the EXEC statement that calls the 
procedure. The ddname of this DD statement must identify the DD 
statement that contains the parameter you are nullifying and the 
procedure step in which the DD statement appears. Code in the operand 
field of this DD statement the parameter you are nullifying followed by 
an equal sign; do not follow the equal sign with a value. The format 
required for a DD statement following the EXEC statement is : 

//procstepname. ddname DD parameter= 

For example, if one of the DD statements in a procedure named SALLS 
is: 

//DDP DD DSNAME=STEP,DlSP=OLD,UNIT=2314,VOLUME=SER=556978 

and you are overriding the DSNAME, DISP, and UNIT parameters, adding the 
DCB parameter, and want the VOLUME parameter ignored, you would code: 

//SALLS. DDP DD DSNAME=SSTEMP,DISP=( ,PASS) ,UNIT=2U00-2 , 
// DCB= ( DEN= 2 , TRTCH=ET) , VOLUME= 
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To nullify the DCB parameter, each DCB subparameter must be nullified 
individually. For example, if a DD statement contains 

DCB=(RECFM=FBA, BLKSI ZE=160,LRECL=80) 
then 

DCB= (RECFM= , BLKSI ZE= , LRECL= ) 

must be coded on the overriding DD statement in order to nullify the DCB 
parameter. 

To nullify a DUMMY parameter, code the DSNAME parameter on the 
overriding DD statement, but do not use the data set name NULLFILE. 
(Coding DSNAME=NULLFILE has the same effect as coding the DUMMY 
parameter.) 

To nullify a DYNAM parameter, code the SYSOUT or DSNAME parameter on 
the overriding DD statement, but do not use the data set name NULLFILE. 

CAUTION ; When you are overriding a procedure DD statement that contains 
the SPACE parameter and the overriding DD statement defines an existing 
data set, be sure to nullify the SPACE parameter. When a secondary 
quantity is coded on the procedure DD statement, the system uses this 
value to assign additional space to the data set instead of the 
secondary quantity you may have specified when the data set was created. 
Also, the RLSE subparameter, when specified on the procedure statement, 
causes the system to release any of the existing data set's unused 
space. 

If you want to nullify, add, or override parameters that appear on 
different DD statements, the overriding DD statements must be in the 
same order in the input stream as the corresponding DD statements in the 
procedure . 
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Example of Overriding, Adding, and Nullifying Parameters on a DD 
Statement 



1. You want to call the following procedure named SALL: 



//STP1 EXEC PGM=GLF14 

//DD11 DD DSNAME^XTRA. LEVEL ,DISP=0LD 

//DD12 DD DSNAME=CONDS,DISP=(,PASS) ,UNIT=2400 

//DD13 DD DUMMY, DSNAME=LAST, VOLUME=REF=* .DD11,DISP-(,CATLG) 

//STP2 EXEC PGM=FAIR 

//DD21 DD DSNAME=*.STP1.DD12,DISP=(0LD, DELETE) 

//DD22 DD DSNAME=JETZ,DISP= (NEW, KEEP) , 

// UNIT=2311,SPACE= (CYL, (3, 1) ,RLSE) 

//DD23 DD SYSOUT=G 



You want to modify the procedure as follows: 

• Change the data set name on the DD12 statement from CONDS to C8495, 
and add the VOLUME parameter. 

• Add the VOLUME parameter to the statement named DD12. 

• Nullify the DUMMY parameter on the DD13 statement. 

• Change the disposition on the DD21 statement from DELETE to KEEP. 

• Define an existing data set on the DD22 statement. 

• Add the parameters UNIT and SPACE on the DD23 statement. 

The EXEC statement that calls the procedure and the overriding DD 
statements that follow it would appear as: 



//CALL EXEC SALL 

//STP1.DD12 DD DSNAME=C849 5,VOLUME=SER=979354 

//STP1.DD13 DD DSNAME=LAST 

//STP2.DD21 DD DISP=( OLD, KEEP) 

//STP 2 . DD 2 2 DD SPACE= , DSNAME=GRl 8 3 3 , DIS P= OLD , LABEL= ( , NL) , 

// VOLUME=SER=577632 

//STP2.DD23 DD UNIT=2314,SPACE= (CYL, (150 ,15) ) 



The cataloged procedure would appear as shown below while the 
procedure is being executed. These modifications do not appear on an 
output listing. 



//STP1 EXEC PGM=GLF14 

//DD11 DD DSNAME=XTRA. LEVEL, DIS P=OLD 

//DD12 DD DSNAME=C8495,DISP=(,PASS),UNIT=2400,VOLUME=SER=979354 

//DD13 DD DSNAME=LAST,V0LUME=REF=*.DD11,DISP=(,CATLG) 

//STP2 EXEC PGM=FAIR 

//DD21 DD DSNAME=*.STPl.DD12,DISP=(OLD,KEEP) 

//DD22 DD DSNAME=GR1833,DISP=0LD,UNIT=2311,LABEL=(,NL), 

// VOLUME=SER=577632 

//DD2 3 DD SYSOUT-G , UNIT=2 31 4 , SPACE= (CYL , (1 50 , 15 ) ) 
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2. You want to call the following in-stream procedure named CARDS: 



| //CARDS 


PROC 


J //STEPA 


EXEC 


| //DDA1 


DD 


| //DDA2 


DD 


1 // 




| //STEPB 


EXEC 


| //DDB1 


DD 


| //DDB2 


DD 


} //DDB3 


DD 


1 // 


PEND 



PGM=FIGURE 

DSNAME= NUMBERS, DISP=OLD 

DSNAME=PROCESS,DISP= (,PASS) ,UNIT=2311, 

SPACE=(TRK, (1,1,1)) 

PGM=RESULT 

DSNAME=VSC, DISP=OLD 

DSNAME=* . STEPA. DDA2,DISP= (OLD, KEEP) 

SYSOUT=C 



You want to modify the procedure as follows: 

• Change the data set name on the DDA1 statement from NUMBERS to 
NAMES. 

• Add the VOLUME parameter to the DDA2 statement. 

• Add the parameters UNIT and SPACE on the DDB3 statement. 

The EXEC statement that calls the procedure and the overriding DD 
statements that follow it would appear as: 



| //CALL EXEC CARDS 

| //STEPA. DDA1 DD DSNAME= NAMES 

| //STEPA. DDA2 DD VOLUME=SER=5858 

| //STEPB. DDB3 DD UNIT=2311,SPACE=(TRK, (150, 15) ) 

L 



The in-stream procedure would appear as shown below while the 
procedure is being executed. These modifications do not appear on an 
output listing. The PROC statement is processed only when it contains 
symbolic parameters. 



| //STEPA 


EXEC 


| //DDA1 


DD 


| //DDA2 


DD 


1 // 




| //STEPB 


EXEC 


j //DDB1 


DD 


| //DDB2 


DD 


| //DDB3 


DD 



PGM= FIGURE 

DSNAME=NAMES , DISP=OLD 

DSNAME=PROCESS, DISP= ( , PASS) , UNIT=2311, 

SPACE=(TRK, (1,1,1)) ,VOLUME=SER=5858 

PGM=RESULT 

DSNAME=VSC, DISP=OLD 

DSNAME=* . STEPA. DDA2, DISP= (OLD, KEEP ) 

SYSOUT=C,UNIT=2311,SPACE=(TRK, (150,15)) 
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OVERRIDING DD STATEMENTS THAT DEFINE CONCATENATED DATA SETS 

When a concatenation of data sets is defined in a cataloged procedure 
and you attempt to override the concatenation with one DD statement, 
only the first (named) DD statement is overridden. To override others, 
you must include an overriding DD statement for each DD statement; the 
DD statements in the input stream must be in the same order as the DD 
statements in the procedure. The second and subsequent overriding 
statements must not be named. If you do not wish to change one of the 
concatenated DD statements, leave the operand field blank on the 
corresponding DD statement in the input stream. (This is the only case 
where a blank operand field for a DD statement is valid.) 
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For example, suppose you are calling a procedure that includes the 
following sequence of DD statements in STEPC: 

r n 

| //DD4 DD DSNAME=A.B.C,DISP=OLD | 

| // DD DSNAME=STRP,DISP=0LD,UNIT=2311,V0LUME=SER=X12182 | 

J // DD DSNAME=TYPE3,DISP=OLD,UNIT=2311,VOLUME=SER=BL142 j 

| // DD DSNAME=A.B.D,DISP=OLD | 

L J 

If you want to override the DD statements that define the data sets 
named STRP and A.B.D, the sequence of DD statements in the input stream 
would appear as: 

r 1 

| //STEPC. DD 4 DD | 

| // DD DSNAME=INV.CLS,DISP=OLD j 

| // DD | 

| // DD DSNAME=PAL8,DISP=OLD,UNIT=2311,VOL=SER=125688 j 



Adding DD Statements to a Procedure 

you can add DD statements to a procedure when you call the procedure. 
These additional DD statements are in effect only while the procedure is 
being executed. 

To add a DD statement to a procedure step, follow the EXEC statement 
that calls the procedure and any overriding DD statements for that step 
with the additional DD statement. The ddname of this DD statement must 
identify the procedure step to which this statement is to be added and 
must be assigned a name that is different from all the ddnames in the 
procedure step. The format required for a DD statement following the 
EXEC statement is: 



//procstepname. ddname DD parameters 

For example, if the first step of a cataloged procedure named MART 
is: 



//STEP1 EXEC PGM=DATE 

//DDM DD DSNAME=BPS(MEMG),DISP=OLD,UNIT=2311,VOLUME=SER=554 982 

//DDN DD UNIT=SYSQE 

And you want to change the UNIT parameter on the DD statement named DDN 
and add a DD statement, you would code: 

//PROC EXEC MART 
//STEP1.DDN DD UNIT=180 
//STEP1.DDO DD UNIT=181 
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Examples of Adding DD Statements to a Procedure 

1. You want to call the following procedure named D99 5A: 



//SA EXEC PGM=ANALY 

//DDA1 DD DSNAME=PROJ.C8 43,DISP=OLD 

//DDA2 DD DDNAME=SYSIN 

//DDA3 DD SYSOUT=B 

//SB EXEC PGM=MANM03 

//DDB1 DD UNIT=24 00 

//DDB2 DD UNIT=2400 

//DDB3 DD DSNAME=X54,VOLUME=SER=(36544, 36545), UNIT=( 2400, 2), 

// DISP= (OLD, KEEP) 



You want to modify the procedure as follows: 

1. Supply the data set definition for the DDA2 statement by adding a 
DD statement. 

2. Change the SYSOUT parameter on the DDA3 statement to UNIT=1403. 

3. Add a DD statement to the step named SB. 

The EXEC statement that calls the procedure and the overriding and 
additional DD statements that follow it would appear ass 



//PROCED EXEC D995A 
//SA.DDA3 DD UNIT=1403 
//SA.SYSIN DD * 



data 



/* 

//SB.DDB4 DD UNIT=(2400 ,SEP= (DDB1, DDB2) ) 

L J 



The cataloged procedure would appear as shown below while the 
procedure is being executed. These modifications do not appear on 
output listing. 
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//SA EXEC PGM=ANALY 

//DDA1 DD DSNAME=PROJ.C843,DISP=OLD 

//DDA2 DD * 

//DDA3 DD UNIT=1403 

//SB EXEC PGM=MANM03 

//DDB1 DD UNIT=2400 

//DDB2 DD UNIT=2400 

//DDB3 DD DSNAME=X54, VOLUME=SER=( 36544, 36545), UNIT=( 2400, 2), 

// DISP= (OLD, KEEP) 

//DDB4 DD UNIT=(24 00,SEP=(DDB1,DDB2)) 
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You want to call the following in-stream procedure named WORK: 



j //WORK 


PROC 




| //STP1 


EXEC 


PGM=PROD 


| //DD1 


DD 


DSNAME=PROJECT f DISP=OLD 


j //DD2 


DD 


DDNAME=SYSIN 


1 // 


PEND 





You want to modify the procedure by supplying the data set definition 
for the DD2 statement by adding a DD statement. 

The EXEC statement that calls the procedure and the additional DD 
statement that follows it would appear as 



//ADD EXEC WORK 

//STP1.SYSIN DD * 



data 



/* 

L J 

The in-stream procedure would appear as shown below while the 
procedure is being executed. These modifications do not appear on the 
output listing. 



j //STP 
| //DD1 
| //DD2 

L 



EXEC 

DD 

DD * 



PGM=PROD 
DSNAME=PROJECT, DISP=OLD 
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Writing Procedures: Cataloged and In-stream 



Why Catalog JCL Statements 

Applications performed at your installation on a regular basis and 
applications that require many control statements can be simplified when 
the control statements for these applications are cataloged. Once the 
job control statements for an application are cataloged on the procedure 
library, any programmer who wants to perform the application need only 
submit a JOB and EXEC statement. On the EXEC statement, he refers the 
system to the control statements required to perform the application. 
If there are modifications the programmer wants to make for the duration 
of the job step, he assigns values to symbolic parameters on the EXEC 
statement and follows the EXEC statement with overriding DD statements. 



Why Use In-stream Procedures 

While in-stream procedures do not have to be added to the procedure 
library, they eliminate the necessity of repeating the same set of 
control statements in ajob. An in-stream procedure can be executed any 
number of times during a job in which it appears and fifteen uniquely 
named in-stream procedures can appear in one job. In-stream procedures 
can be modified just as cataloged procedures. They also provide you 
with a means of testing procedures before adding them to the procedure 
library as cataloged procedures. Because an in-stream procedure exists 
in the form of cards, it can be considered a "portable procedure'' in 
that it can easily be moved from one input stream to another. 

THE CONTENTS OF CATALOGED AND IN-STREAM PROCEDURES 

Cataloged and in-stream procedures contain one or more EXEC statements, 
each followed by associated DD statements. Each EXEC statement 
identifies the program to be executed, and the DD statements that follow 
define the input, output, and work data sets to be used by the program. 
Each EXEC statement and its associated DD statements are called a 
procedure step. 

Cataloged and in-stream procedures cannot contain: 

1. EXEC statements that refer to other cataloged procedures. 

2. JOB, delimiter, or null statements. 

3. DD statements with the ddname JOBLIB. 

4. DD statements with * or DATA coded in the operand field. 

A cataloged or in-stream procedure can contain a DD statement with 
the ddname STEPLIB. If a procedure step requires use of a program in a 
private library other than SYSl.LINKLIB, you define that library on this 
DD statement. If the DD statement is not overridden when the procedure 
is called, it makes the private library available to the step. (For 
information on the STEPLIB DD statement, see "Special DD Statements" in 
the section "The DD statement.") 

For ease in modifying a cataloged procedure, you can include symbolic 
parameters in the procedure. How to use symbolic parameters is 
described next. 
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USING SYMBOLIC PARAMETERS IN A PROCEDURE 

When you prepare the control statements that you plan to catalog, you 
can include symbolic parameters. A symbolic parameter is characterized 
by a name preceded by an ampersand (S) and appears in the operand field 
of a cataloged procedure statement. A symbolic parameter stands for a 
parameter, a subparameter, or a value. 

Symbolic parameters allow a programmer who calls the procedure to 
easily modify the procedure for the duration of the job step. When the 
programmer calls the procedure, he assigns values to the symbolic 
parameters on the EXEC statement. When you prepare control statements 
that you plan to catalog, you can include a PROC statement and assign 
default values to any of the symbolic parameters that are included. 

When you prepare control statements to be used as an in- stream 
procedure, you must include a PROC statement which can be used to assign 
default values to any of the symbolic parameters that are included. 

A symbolic parameter is one to seven alphameric and national (#,a,$) 
characters preceded by a single ampersand. The first character must be 
alphabetic or national. Since a single ampersand defines a symbolic 
parameter, you code double ampersands when you are not defining a 
symbolic parameter. For example, if you want to pass 543SLEV to a 
processing program by means of the PARM parameter on an EXEC statement, 
you must code 

PARM= , 543g€LEV l 

The system treats the double ampersands as if a single ampersand has 
been coded, and only one ampersand appears in the results. 

The following are examples of symbolic parameters: 

//STEP1 EXEC P6M=C0B , PARM= ' PI , &P2 , P3 ' 

//DD1 DD DSNAME=6SFIX,UNIT= SDEVICE ,SPACE=(CYI., ( SSPACE ,10)) 

//DD2 DD DSNAME=&SCHAG,UNIT=2400,DCB=BLKSIZE =6LENGTH 

Keyword parameters that can be coded on an EXEC statement cannot be 
used to define symbolic parameters. For example, SPGM and &REGION 
cannot be used as symbolic parameters. 

Any parameter, subparameter, or value in the procedure that may vary 
each time the procedure is called is a good candidate for definition as 
a symbolic parameter. For example, if different values can be passed to 
a processing program by means of the PARM parameter on one of the EXEC 
statements, you might define the PARM parameter field as one or more 
symbolic parameters, 

PARM=SALLVALS 
or 

PARM=£DECKS CODE 

If symbolic parameters are defined in the cataloged procedures used 
at your installation, the definitions should be consistent. For 
example, every time the programmer is to assign his department number to 
a symbolic parameter, no matter which procedure he is calling, the 
symbolic parameter could be defined as SDEPT. In different procedures 
you could code 

ACCT=( 43877, fiDEPT) 
and 

DSNAME=LIBRARY . SDEPT . MACS 
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The programmer would assign his department number on the EXEC statement 
that calls the procedure whenever SDEPT appears in a procedure. Of 
course, in order for the programmer to know that he is to assign his 
department number to the symbolic parameter SDEPT, the installation must 
make this information available to all the programmers that may be using 
the cataloged procedures. 

You can define two or more symbolic parameters in succession without 
including a comma to delimit the symbolic parameters, for example, 
SP1&P2. You can also define a potion of a parameter, subparameter, or 
value as a symbolic parameter. You do this by placing the symbolic 
parameter before, after, or in between the information that is not 
variable. 

If you place a symbolic parameter after some information that does 
not vary, it is not necessary to code a delimiter. The system 
recognizes a symbolic parameter when it encounters the single ampersand. 

If you place a symbolic parameter bef ore some information that does 
not vary, a period may be required following the symbolic parameter to 
distinguish the end of the symbolic parameter and the beginning of the 
information that does not vary. A period is required following the 
symbolic parameter when; 

1. The character following the symbolic parameter is an alphabetic or 
numeric character. 

2. The character following the symbolic parameter is a left 
parenthesis or a period. 

In these cases, the system recognizes the period as a delimiter, and the 
period does not appear after a value is assigned to the symbolic 
parameter. (A period will appear after a value is assigned to the 
symbolic parameter when two consecutive periods are coded.) 

The following examples are valid ways of combining symbolic 
parameters and information that does not vary. 

Placing a symbolic parameter after information that does not vary; 

1. LIBRARY UMEMBER) 

2. US ERLIB.S LEVEL 

Placing a symbolic parameter before information that does not vary; 

1. , &0PTI0N+15 I 

2. &PASS.A43B8 

The period is required because an alphabetic character follows the 
symbolic parameter. 

3. €URNO. 54328 

The period is required because a numeric character follows the 
symbolic parameter. 

4 . & LIBRARY . (MEMG) 

The period is required because a left parenthesis follows the 
symbolic parameter. 
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5. €FILL..GR0UP5 

A period is to appear in the results; therefore, two consecutive 
periods are coded. 

When a value is assigned to the symbolic parameter, this value and 
the parameter, subparameter, or value that this is a portion of cannot 
exceed 120 characters. 

The programmer who calls a procedure assigns values to the symbolic 
parameters contained in the procedure. He can also nullify symbolic 
parameters. A delimiter, such as a leading comma or a trailing comma, 
next to a symbolic parameter is not automatically removed when the 
symbolic parameter is nullified. For example, if the operand field 
contains 

VOLUME=SER= (111111, SKEY) 

the comma preceding SKEY is not removed when 6KEY is nullified. If the 
symbolic parameter that is nullified is a positional parameter, a comma 
must remain to indicate its absence. In other cases, a delimiter that 
is not removed when the symbolic parameter is nullified may cause a 
syntax error. To help the programmer who nullifies a symbolic parameter 
avoid this error condition, define those symbolic parameters that may be 
nullified without the delimiter. For example, you could code 

VOLUME=SER=(1111116KEY) 

The delimiter is included when a value is assigned to the symbolic 
parameter. For example, the programmer would code 

KEY=», 222222' 

A cataloged procedure statement may utilize DDNAME and DCB parameters 
to define data in the input stream. Such a statement should not contain 
symbolic parameters when the automatic SYSIN batching reader is used. 
(Information on the cataloged procedure for the automatic SYSIN batching 
reader is contained in the publication IBM System/ 360 Operating System; 
System Programmer's Guide .) 

The PRQC Statement : When establishing cataloged or in-stream procedures 
that contain symbolic parameters it is generally good practice to assign 
default values to the symbolic parameters. These default values are 
used if the programmer who calls the procedure does not assign values to 
one or more of the symbolic parameters. 

You assign default values on a PROC statement. The PROC statement is 
optional for cataloged procedures; if it is used, the PROC statement 
must be the first statement in the procedure. The PROC statement is 
described in the section "The PROC statement." 

The PEND statement which is used to mark the end of an in-stream 
procedure is described in Section IX. 
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ADDING AND MODIFYING CATALOGED PROCEDURES 

You add procedures to the procedure library by using the IEBUPDTE 
utility program. You also use this utility program to permanently 
modify existing procedures. How to use this utility program for adding 
and modifying cataloged procedures is described in the chapter "The 
IEBUPDTE Program*' in the publication IBM System/360 Operating System: 
Utilities . 

When you add a cataloged procedure to the procedure library, that 
procedure cannot be executed before the job that adds it to the 
procedure library terminates. When you modify an existing cataloged 
procedure, the operator must be notified. What the operator must do 
before he allows the job to be executed is described in the chapter "How 
to Run Jobs That Update System Data Sets'* in the publication IBM 
System/360 Operating System; Operator's Guide 
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Part V: Examples of Cataloged Procedures for 
Compilation, Link Edits, and Executions 



Part V shows examples of the cataloged procedures provided by IBM for 
various compilers. They are: 



ALGOL 

ALGOFC 
ALGOFCL 
ALGOFCLG 
ALGOFCG 

Assembler E 
ASMEC 
ASMECL 
ASMECLG 
ASMECG 

Assembler F 
ASMFC 
ASMFCL 
ASMFCLG 
ASMFCG 

COBOL E 
COBEC 
COBELG 
COBECLG 

COBOL F 
COBFC 
COBFLG 
COBFCLG 



(Compile) 

(Compile-Link Edit) 
(Compile- Link Edit- Go) 
(Compile- Load) 



(Compile) 

(Compile-Link Edit) 
(Compile-Link Edit-Go) 
(Compile-Load) 



(Compile) 

(Compile-Link Edit) 
(Compile-Link Edit-Go) 
(Compile-Load 



(Compile) 
(Link Edit-Go) 
(Compile-Link Edit-Go) 



(Compile) 
(Link Edit-Go) 
(Compile-Link Edit-Go) 



• American National Standard COBOL 
COBUC (Compile) 
COBULG (Link Edit-Go) 
COBUCLG (Compile-Link Edit-Go) 
COBUCG ( Compile-Load ) 



FORTRAN E 
FORTEC 
FORTECL 
FORTELG 
FORTECLG 

FORTRAN G 
FORTGC 
FORTGCL 
FORTGLG 
FORTGCLG 

FORTRAN H 
FORTHC 
FORTHCL 
FORTHLG 
FORTHCLG 



(Compile) 

(Compile-Link Edit) 
(Link Edit-Go) 
(Compile-Link Edit-Go) 



(Compile) 

(Compile-Link Edit) 
(Link Edit-Go) 
(Compile-Link Edit-Go) 



(Compile) 

(Compile-Link Edit) 
(Link Edit-Go) 
(Compile-Link Edit-Go) 



Figure 11 
Figure 12 
Figure 13 
Figure 14 



Figure 15 
Figure 16 
Figure 17 
Figure 18 



Figure 19 
Figure 20 
Figure 21 
Figure 22 



Figure 23 
Figure 24 
Figure 25 



Figure 26 
Figure 27 
Figure 28 



Figure 29 
Figure 30 
Figure 31 
Figure 32 



Figure 33 
Figure 34 
Figure 35 
Figure 36 



Figure 37 
Figure 38 
Figure 39 
Figure 40 



Figure 41 
Figure 42 
Figure 43 
Figure 44 
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•PL/I F 

PL1DFC 

PL1LFC 

PL1LFCL 

PL1LFLG 

PL1LFCLG 

PL1LFCG 

PL1LFG 



(Compile with deck output) 

(Compile with load module output) 

(Compile- Link Edit) 

(Link Edit-Go) 

(Compile-Link Edit- Go) 

(Compile- Load ) 

(Load) 



Figure 45 
Figure 46 
Figure 47 
Figure 48 
Figure 49 
Figure 50 
Figure 51 



These cataloged procedures are presented here for your convenience 
while learning JCL. For further details and up-to-date information you 
should refer to the Programmer's Guide associated with each compiler. 

A section with examples of how to call and modify the procedures 
follows the Figures. 



ALGOL 



//ALGOL 

//SYSPRINT 

//SYS PUNCH 

//SYSLIN 

// 

//SYSUT1 

// 

//SYSUT2 

// 

//SYSUT3 

Note : You 
the 



EXEC PGM=ALGOL,REGION=48K 

DD SYSOUT=A 

DD SYSOUT=B 

DD DSN=$LOADSET, UNIT=SYSSQ, SEP=SYSPUNCH, 

SPACE=(3600, (10,4)),DISP=(MOD,PASS) 
DD DSN=SSYSUT1 , UNI T=SYSSQ,SEP= SYSPRINT, 

SPACE= (1024, (50,10)) 
DD DSN=SSYSUT2 , UNIT=S YSSQ , SEP=SYSUT1, 

SPACE= (1024, (50,10)) 
DD DSN=SSYSUT3 ,UNIT=SYSDA,SPACE= (1024, (40 ,10) ) 



must provide an ALGOL. SYSIN DD statement when you call 
procedure. 



Figure 11, ALGOFC (Compile) 





//ALGOL 


EXEC 


PGM=ALGOL, REGION=4 8K 


1 




//SYSPRINT 


DD 


SYSOUT*=A 






//SYS PUNCH 


DD 


SYSOUT=B 






//SYSLIN 


DD 


DSN=SLOADSET,UNIT=SYSSQ,SEP=SYSPUNCH, 






// 




SPACE= ( 360 , ( 10 , 4) ) , DISP= (MOD,, PASS) 






//SYSUT1 


DD 


DSN^&SYSUTl , UNIT=SYSSQ, SEP=SYSPRINT , 






// 




SPACE= (1024, (50, 10) ) 






//SYSUT2 


DD 


DSN=&S YSUT2 , UNIT=S YSSQ , SEP=SYSUT1 , 






// 




SPACE=(1024,(50,10)) 






//SYSUT3 


DD 


DSN=SSYSUT3 ,UNIT=SYSDA,SPACE= (1024, (40 ,10) ) 






//LKED 


EXEC 


PGM=IEWL , PARM= ■ XREF , LIST , LET ' , COND= ( 5 , LT , ALGOL) , 
REGI0N=96K 






//SYSPRINT 


DD 


SYS0UT=A 






//SYSLIN 


DD 


DSN=€L0ADSET, DISP= (OLD , DELETE) 






// 


DD 


DDNAME=SYSIN 






//SYSLIB 


DD 


DSN=SYS1 .ALGLIB ,DISP=SHR 






//SYSLMOD 


DD 


DSN=«GOSET (GO) , UNIT=SYSDA, DISP= (MOD, PASS) , 






// 




SPACE=(1024, (50,20,1)) 






//SYSUT1 


DD 


DSN=SSYSUT1 , UNIT=SYSDA, SEP= (SYSLIB, SYSLMOD) , 






// 




SPACE=(1024, (50,20)) 




J 






~» 


i 


Note: You 


must 


provide an ALGOL. SYSIN DD statement when you call 




the 


procedure. 





Figure 12. ALGOFCL (Compile-Link Edit) 
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| //ALGOL 


EXEC 


| //SYSPRINT 


DD 


| //SYS PUNCH 


DD 


| //SYSLIN 


DD 


1 // 




| //SYSUT1 


DD 


1 // 




| //SYSUT2 


DD 


1 // 




1 //SYSUT3 


DD 


| //LKED 


EXEC 


1 // 




| //SYSPRINT 


DD 


| //SYSLIN 


DD 


1 // 


DD 


I //SYSLIB 


DD 


| //SYSLMOD 


DD 


I // 




| //SYSUT1 


DD 


1 // 




| //GO 


EXEC 


| //ALGLDD01 


DD 


| //SYSPRINT 


DD 


| //SYSUTl 


DD 



h 



PGM= ALGOL, REGIONS 8K 

SYSOUT=A 

SYSOUT=B 

DSN=6LOADSET, UNIT=SYSSQ , SEP=SYSPUNCH, 

SPACE= ( 360 , ( 10, 4) ) , DISP= (MOD w PASS) 

DSN=SSYSUT1,UNIT=SYSSQ,SEP= SYSPRINT, 

SPACE=(1024, (50,10)) 

DSN=SSYSUT2,UNIT=SYSSQ,SEP=SYSUT1, 

SPACE=(1024, (50, 10) ) 

DSN=SSYSUT3,UNIT=SYSDA,SPACE= (1024, (40*10)) 

PGM= IEWL , P ARM= • XREF, LIST , LET * , COND= ( 5, LT, ALGOL) , 

REGION=96K 

SYSOUT=A 

DSN=SLOADSET , DISP= ( OLD , DELETE) 

DDNAME=SYSIN 

DSN=SYS1 . ALGLIB , DISP=SHR 

DSN=SGOSET (GO) , UNIT=SYSDA, DISP=( MOD, PASS) , 

SPACE=(1024, (50,20,1)) 

DSN=fiSYSUTl , UNIT=SYSDA, SEP= (SYSLIB, SYSLMOD) , 

SPACE= (1024, (50,20)) 

PGM=*. LKED. SYSLMOD, COND= ( (5, LT, ALGOL) ,, (5,LT,LKED) ) 

SYSOUT=A 

SYSOUT=A 

DSN=SSYSUT1 , UNIT=SYSSQ, SPACE= ( 1024, (20,10)) 



Note: You must provide an ALGOL. SYSIN DD statement when you call 
the procedure. 



H 



Figure 13. ALGOFCLG (Compile -Link Edit-Go) 



//ALGOL 

//SYSPRINT 

//SYSPUNCH 

//SYSLIN 

// 

// 

//SYSUT1 

// 

//SYSUT2 

// 

//SYSUT3 

//GO 

//SYSLIN 

//SYSLIB 

//LOADPRNT 

//SYSPRINT 

//ALGLDD01 

//SYSUT1 



EXEC 
DD 
DD 
DD 



DD 

DD 

DD 

EXEC 

DD 

DD 

DD 

DD 

DD 

DD 



PGM^ALGOL, REGION=4 8 K 

SYSODT=A 

SYSOUT-B 

DSN=6LOADSET, UNIT=SYSSQ, SEP=SYSPUNCH, 

SPACE=(3600, (10,4)), 

DISP= (MOD, PASS) 

DSN=SSYSUT1 ,UNIT=SYSSQ ,SEP= SYSPRINT, 

SPACE=(1024, (50, 10) ) 

DSN=6SYSUT2,UNIT=SYSSQ,SEP=SYSUT1, 

SPACE= (1024, (50, 10) ) 

DSN=£SYSUT3 ,UNIT=SYSDA,SPACE= (1024, (40 ,10) ) 

PGM=LOADER , PARM= (MAP, LET, PRINT) , COND= ( 5, LT , ALGOL) 

DSN-gLOADSET, DISP= ( OLD , DELETE) 

DSN=SYS1 . ALGLIB, DISP=SHR 

SYSOUT=A 

SYSOUT=A 

SYSOUT-A 

DSN=6SYSUT1,UNIT=SYSSQ,SPACE=(1024, (20,10)) 



|. H 

Note : You must provide an ALGOL. SYSIN DD statement when you call the 
procedure. 

L . J 

Figure 14. ALGOFCG (Compile -Load) 
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Assembler E 





//ASM 


EXEC 


PGM=IETASM 




//SYSLIB 


DD 


DSNAME=SYS1 .MACLIB, DISP=OLD 




//SYSUT1 


DD 


UNIT=SYSSQ,SPACE~(400, (400,50)) 




//SYSUT2 


DD 


UNIT=SYSSQ,SPACE=(400, (400,50)) 




//SYSUT3 


DD 


UNIT=(SYSSQ,SEP=(SYSUT2,SYSUTl, SYSLIB) ) , 




// 




SPACE=(400, (400,50)) 




//SYSPRINT 


DD 


SYSOUT=A 


h 


//SYS PUNCH 


DD 


UNIT=SYSCP 


Note: You must provide an ASM.SYSIN DD statement when you call the 




procedure. 



H 



Figure 15. ASMEC (Compile) 





//ASM 


EXEC 


PGM=IETASM 




//SYSLIB 


DD 


DSNAME=SYS1 .MACLIB, DISP=OLD 




//SYSUT1 


DD 


UNIT=SYSSQ,SPACE=(400, (400,50)) 




//SYSUT2 


DD 


UNIT=SYSSQ, SPACE=( 400, ( 400, 50) ) 




//SYSUT3 


DD 


UNIT=(SYSSQ,SEP=(SYSUT2 ,SYSUT1, SYSLIB) ) , 




// 




SPACE= (400, (400,50)) 




//SYSPRINT 


DD 


SYSOUT=A 




//SYS PUNCH 


DD 


DSNAME=SLOADSET,UNIT=SYSSQ,SPACE=(80, (200,50)) , 




// 




DISP=( MOD, PASS) 




//LKED 


EXEC 


PGM= IEWL , P ARM= ( XREF, LIST , NCAL ) 




//SYSLIN 


DD 


DSNAME=gLOADSET ,DISP= ( OLD , DELETE) 




// 


DD 


DDNAME=SYSIN 




//SYSLMOD 


DD 


DSNAME=SGOSET (GO)UNIT=SYSDA,SPACE= (1024, (50, 20, 1) ) 




//SYSUT1 


DD 


UNIT= (SYSDA,SEP=( SYSLIN, SYSLMOD) ) , 




// 




SPACE=(1024, (50,20)) 


k- 


//SYSPRINT 


DD 


SYSOUT=A 


Note: You must provide an ASM.SYSIN DD statement when vou call the 




procedu 


re. 



H 



Figure 16. ASMECL (Compile-Link Edit) 
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//ASM 

//SYS LIB 

//SYSUT1 

//SYSUT2 

//SYSUT3 

// 

//SYSPRINT 

//SYS PUNCH 

// 

//LKED 

//SYSLIN 

// 

//SYSLMOD 

// 

//SYSUT1 

// 

//SYSPRINT 

//GO 



EXEC 

DD 

DD 

DD 

DD 

DD 
DD 

EXEC 
DD 
DD 
DD 

DD 

DD 
EXEC 



PGM=IETASM 

DSNAME=SYSl.MACLIB, DISP=OLD 

UNIT=SYSSQ,SPACE=(400„ (400,50)) 

UNIT=SYSSQ,SPACE=(400, (400,50)) 

UNIT=(SYSSQ,SEP=(SYSUT2,SYSUTl, SYSLIB)) , 

SPACE=(400, (400,50)) 

SYSOUT=A 

DSNAME=&LOADSET,UNIT=SYSSQ,SPACE=(80, (200,50)), 

DISP= (MOD, PASS) 

PGM=IEWL, PARM= ( XREF, LET, LIST, NCAL) 

DSNAME=&LOADSET,DISP= (OLD, DELETE) 

DDNAME=SYSIN 

DSNAME=&GOSET(GO),UNIT=SYSDA,SPACE=(1024 # (50,20,1)), 

DISP= (MOD, PASS) 

UNIT= ( S YSDA , SEP= ( SYSLIN , SYSLMOD) ) , 

SPACE=(1024, (50,20)) 

SYSOUT=A 

PGM=* . LKED . SYSLMOD 



^ ^ 

Note : You must provide an ASM.SYSIN DD statement when you call the 
procedure. 

L J 

Figure 17. ASMECLG (Compile-Link Edit-Go) 



//ASM 

//SYSLIB 

//SYSUT1 

//SYSUT2 

//SYSUT3 

// 

//SYSPRINT 

//SYSPUNCH 

// 

//GO 

//SYSLIN 

//SYSLOUT 



EXEC PGM=IETASM , PARM= * LOAD ' 

DD DSNAME=SYSl.MACLIB,DISP=OLD 

DD UNIT=SYSSQ,SPACE(400, (400,50)) 

DD UNIT=SYSSQ,SPACE=(400, (400,50)) 

DD UNIT=(SYSSQ,SEP=(SYSUT2, SYSUTl, SYSLIB) ) , 

SPACE=(400, (400,50)) 
DD SYSOUT=A 
DD DSNAME=&LOADSET,UNIT=SYSSQ, 

SPACE= (80, ( 200, 50) ) , DISP= (MOD, PASS) 
EXEC PGM=LOADER , PARM= ' MAP, PRINT , NOCALL, LET • 
DD DSNAME=&LOADSET,DISP=( OLD, DELETE) 
DD SYSOUT=A 



^ J 

Note : You must provide an ASM.SYSIN DD statement when you call the 
procedure. 

L . 

Figure 18. ASMECG (Compile-Load) 
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["//ASM" 



EXEC 

DD 
DD 



//SYSLIB 

//SYSUT1 

// 

//SYSUT2 DD 

//SYSUT3 DD 

// 

//SYS PRINT DD 

//SYSPUNCH DD 



PGM=IEUASM, REGION=50K 

DSNAME=SYS1 .MACL1B,DISP=SHR 

DSNAME=€SYSUT1, UNIT=SYSSQ,SPACE=( 1700, (400,50)), 

SEP=SYSLIB 

DSNAME= &SYSUT2, UNIT=SYSSQ, SPACE=( 1700, (400,50)) 

DSNAME=€SYSUT3 , UNIT= ( S YSSQ , SEP= (SYSUT2, SYSUTl, 

SYSLIB) ),SPACE= (17 00, (400,50)) 

SYSOUT=A 

SYSOUT=B 



H 



No-be ; You must provide an ASM.SYSIN DD statement when you call the 
procedure. 

L . 

Figure 19. ASMFC (Compile) 



//ASM EXEC PGM=IEUASM,PARM=LOAD,REGION=50K 

//SYSLIB DD DSNAME=SYS1 .MACLIB, DISP=SHR 

//SYSUTl DD DSNAME=SSYSUT1,UNIT=SYSSQ,SPACE= (1700, (400,50)), 

// SEP=SYSLIB 

//SYSUT2 DD DSNAME=SSYSUT2,UNIT=SYSSQ,SPACE=(1700, (400,50)) 

//SYSUT3 DD DSNAME=SSYSUT3,UNIT=(SYSSQ,SEP=<SYSUT2, SYSUTl, 

// SYSLIB )),SPACE=( 17 00, (400,50)) 

//SYSPRINT DD SYSOUT=A 

//SYSPUNCH DD SYSOUT=B 

//SYSGO DD DSNAME=SLOADSET,UNIT=SYSSQ,SPACE= (80, (100,50)), 

// DISP= (MOD, PASS) 

//LKED EXEC PGM=IEWL, PARM= ( XREF , LIST , NCAL) , REGION= 9 6K , 

// COND= ( 8 , LT , ASM) 

//SYSLIN DD DSNAME=SLOADSET,DISP=( OLD, DELETE) 

// DD DDNAME=SYSIN 

//SYSLMOD DD DSNAME=SGOSET (GO) ,UNIT=SYSDA, SPACE= (1024 , (50, 20, 1) ) , 

// DISP= ( MOD , PASS ) 

//SYSUTl DD DSNAME=SSYSUT1, UNIT=(SYSDA,SEP= (SYSLIN, SYSLMOD) ) , 

// SPACE=(1024, (50,20)) 

//SYSPRINT DD SYSOUT=A 



h- 



Note ; You must provide an ASM.SYSIN DD statement when you call the 
procedure. 



Figure 20. ASMFCL (Compile-Link Edit) 
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| //ASM 


EXEC 


| //SYS LIB 


DD 


| //SYSUT1 


DD 


1 // 




| //SYSUT2 


DD 


| //SYSUT3 


DD 


1 // 




| //SYSPRINT 


DD 


| //SYS PUNCH 


DD 


| //SYSGO 


DD 


1 // 




| //LKED 


EXEC 


1 // 




| //SYSLIN 


DD 


1 // 


DD 


| //SYSLMOD 


DD 


1 // 




| //SYSUT1 


DD 


1 // 




| //SYSPRINT 


DD 


| //GO 

L 


EXEC 


r 




| Note: You 


must 



PGM=IEUASM, PARM=LOAD , REGION=5 OK 

DSNAME=SYS1 .MACLIB, DISP=SHR 

DSNAME=&SYSUT1,UNIT=SYSSQ,SPACE=(1700, (400,50)) , 

SEP=SYSLIB 

DSNAME=SSYSUT2 , UNIT=SYSSQ , SPACE= (1700 ,(400,50)) 

DSNAME= SSYSUT3, UNIT= ( SYSSQ, SEP= ( S YSUT2 , SYSUT1, 

SYSLIB)),SPACE=(1700, (400,50)) 

SYSOUT=A 

SYSOUT=B 

DSNAME=SLOADSET,UNIT=SYSSQ,SPACE=(80, (100,50)) , 

DISP= (MOD, PASS) 

PGM=IEWL, PARM= (XREF , LET , LIST, NCAL) , REGION=96K, 

COND=(8,LT,ASM) 

DSNAME=SLOADSET ,DISP= (OLD, DELETE) 

DDNAME=SYSIN 

DSNAME=fiGOSET(GO) ,UNIT=SYSDA, SPACE= (1024 , (50, 20, 1) ) , 

DISP= (MOD, PASS) 

DSNAME=SSYSUT1,UNIT=(SYSDA,SEP= (SYSLIN, SYSLMOD)), 

SPACE=(1024, (50,20)) 

SYSOUT=A 

PGM=*. LKED. SYSLMOD, COND=( (8,LT,ASM) , (4,LT,LKED)) 



Figure 21. ASMFCLG (Compile -Link Edit-Go) 



//ASM EXEC PGM=IEUASM , PARM= * LOAD ■ , REGION=5 OK 

//SYSLIB DD DSNAME= SYS 1. MACLIB, DISP=SHR 

//SYSUT1 DD DSNAME=SSYSUT1,UNIT=SYSSQ,SPACE= (1700, (400,50)), 

// SEP= (SYSLIB) 

//SYSUT2 DD DSNAME=SSYSUT2,UNIT=SYSSQ,SPACE= (1700, (400,50)) 

//SYSUT3 DD DSNAME=SSYSUT3,SPACE=(1700, (400, 50)), 

// UNIT=(SYSSQ,SEP=(SYSUT2,SYSUT1, SYSLIB)) 

//SYSPRINT DD SYSOUT=A 

//SYS PUNCH DD SYSOUT=B 

//SYSGO DD DSNAME=SLOADSET,UNIT=SYSSQ,SPACE= (80, (200,50)), 

DISP= (MOD, PASS) 
//GO EXEC PGM=LOADER,PARM= , MAP,PRINT,NOCALL,LET' 

//SYSLIN DD DSNAME=€LOADSET,DlSP=( OLD, DELETE) 
//SYSLOUT DD SYSOUT=A 



Note : You must provide an ASM. SYS IN DD statement when you call the 
procedure. 



Figure 22. ASMFCG (Compile-Load) 
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//COB EXEC 


PGM=IEPCBLO , REGION=24K 




//SYS PRINT DD 


SYSOUT=A 




//SYSPUNCH DD 


UNIT=SYSCP 




//SYSUT1 DD 


UNIT=SYSDA, SPLIT= ( 2,CYL, (40,10)) 




//SYSUT2 DD 


UNIT=S YSDA , SPLIT=4 




//SYSUT3 DD 


UNIT=SYSDA, SPLIT=4 




//SYSIN DD 


DDNAME=SYSIN,DCB=BLKSIZE=80 


i 


Note: You must provide a COB. SYSIN DD statement when you call the 


r 


procedure. 





Figure 23. COBEC (Compile) 



//LKED EXEC PGM=IEWL,REGION=96K,PARM= (XREF, LIST, LET) 

//SYSLIB DD DSNAME=SYS1. COB LIB, DISP=(SHR, KEEP) 

//SYSLMOD DD DSNAME=SGODATA(RUN) , DISP= (NEW, PASS) , 

// UNIT=SYSDA,SPACE=(1024, (50,20,1)) 

//SYSUT1 DD UNIT=(SYSDA,SEP=(SYSLIN, SYSLMOD)), 

// SPACE=(1024, (50,20)) 

//SYSPRINT DD SYSOUT=A 

//SYSLIN DD DDNAME=SYSIN 

//GO EXEC PGM=* . LKED . SYSLMOD, COND= ( 5, LT, LKED) 

//SYSABEND DD SYSOUT=A 

// DD SYSOUT=A,DCB=(BLKSIZE=120,LRECL=120) 



H 



Note ; You must provide a LKED. SYSIN DD statement when you call the 
procedure. 



Figure 24. COBELG (Link Edit-Go) 



j //COB 


EXEC 


PGM=IEPCBL0 , REGION=24K 


1 


j //SYSPRINT 


SS 


SYSOUT=A 




| //SYSUT1 


DD 


UNIT=SYSDA,SPLIT=(2,CYL, (40,10)) 




| //SYSUT2 


DD 


UNIT=SYSDA, SPLIT=4 




| //SYSUT3 


DD 


UNIT=S YSDA , SPLIT=4 




| //SYSPUNCH 


DD 


DSNAME= 6LOADSET , DISP= ( MOD , PASS ) , 




1 // 




UNIT=SYSDA,SPACE=(TRK, (50,10)) 




| //SYSIN 


DD 


DDNAME=SYSIN, DCB=BLKSIZE=80 




j //LKED 


EXEC 


PGM=IEWL, PARM= ( XREF , LIST , LET) , COND= ( 9 , LT, COB) , 




1 // 




REGION=9 6K 




| //SYSLIN 


DD 


DSNAME= SLOADSET , DIS P= ( OLD , DELETE) 




1 // 


DD 


DDNAME=SYSIN 




| //SYSLMOD 


DD 


DSNAME = SGODATA ( RUN) , DIS P= ( NEW , PASS ) , 




1 // 




UNIT=SYSDA, SPACE= ( 1024, ( 50 ,20, 1) ) 




| //SYSLIB 


DD 


DSNAME=SYS1 .COBLIB,DlSP= (SHR,KEEP) 




| //SYSUT1 


DD 


UNIT= (SYSDA, SEP=( SYSLIN, SYSLMOD) ) , 




1 // 




SPACE=(1024, (50,20)) 




| //SYSPRINT 


DD 


SYSOUT=A 




| //GO 


EXEC 


PGM=* . LKED . SYSLMOD , COND= ( ( 9 , LT , COB) , ( 5 , LT , LK ED) ) 




| //SYSABEND 


DD 


SYSOUT=A 




| //SYSOUT 

V - -, ~ 


DD 


SYSOUT=A,DCB= (,BLKSIZE=120 ,LRECL=120) 


1 


r 

| Note: You must provide a COB. SYSIN DD statement when you call the 


f 


| procedure. 





Figure 25. COBCLG (Compile-Link Edit-Go) 
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//COB 

//SYS PRINT 

//SYSPUNCH 

//SYSUTl 

//SYSUT2 

//SYSUT3 

//SYSUT4 



I 

j Note ; 



EXEC PGM=IEQCBLO , PARM= ■ DECK , NOLOAD • , REGION= 8 6K 

DD SYSOUT=A 

DD SYSOUT=B 

DD UNIT=SYSDA,SPACE=U60, (700,100)) 

DD UNIT=SYSDA, SPACE=(460, (700,100)) 

DD UNIT=SYSDA,SPACE=(460, (700,100)) 

DD UNIT=SYSDA,SPACE=(460„ (700,100)) 



H 



You must provide a COB.SYSIN DD statement when you call the 
procedure. 



L 

Figure 26. COBFC (Compile) 



//LKED EXEC PGM=IEWL, PARM=* LIST, XREF, LET' ,REGION=96K 
//SYS LIN DD DDNAME=SYSIN 

//SYSLMOD DD DSNAME=SGODATA (RUN) ,DISP= (NEW, PASS) , UNI T=SYSDA, 
// SPACE=(1024, (50,20, 1) ) 

//SYS LIB DD DSNAME=SYS1 . COBLIB , DISP=SHR 
//SYSUT1 DD UNIT=(SYSDA,SEP=( SYS LIN, SYSLMOD), 
// SPACE= (1024, (50,20)) 

//SYSPRINT DD SYSOUT=A 

//GO EXEC PGM=* . LKED . SYSLMOD, COND= ( 5 , LT\, LKED) 
//SYS ABEND DD SYSOUT=A 
J. j 

Note ; You must provide a LKED.SYSIN DD statement when you call the 
procedure. 

L J 



Figure 27. COBFLG (Link Edit-Go) 



//COB 

//SYSPRINT 

//SYSUT1 

//SYSUT2 

//SYSUT3 

//SYSUT4 

//SYS LIN 

// 

//LKED 

// 

//SYS LIN 

// 

//SYSLMOD 

// 

//SYS LIB 

//SYSUT1 

// 

//SYSPRINT 

//GO 

//SYSABEND 



EXEC 

DD 

DD 

DD 

DD 

DD 

DD 

EXEC 

DD 
DD 
DD 

DD 
DD 

DD 

EXEC 

DD 



PGM=IEQCBL0 , REGION=86K 

SYSOUT=A 

UNIT=SYSDA,SPACE=(460, (700,100)) 

UNIT=SYSDA,SPACE=(U60, (700,100)) 

UNIT=SYSDA,SPACE=(460, (700,100)) 

UNIT=SYSDA,SPACE=(U60, (700,100)) 

DSNAME=6LOADSET, DISP=(MOD, PASS) , UNIT=SYSDA, 

SPACE=(80, (500,100)) 

PGM=IEWL,PARM=' LIST, XREF, LET' , COND=( 5, LT,COB) , 

REGION=96K 

DSNAME= SLOADSET, DISP= ( OLD, DELETE) 

DDNAME=SYSIN 

DSNAME= £GO DATA (RUN) , DISP= (NEW, PASS) , UNIT=SYSDA , 

SPACE=(1024, (50,20,1)) 

DSNAME=SYS1 . COBLIB, DISP=SHR 

UNIT=(SYSDA,SEP=( SYS LIN, SYSLMOD) ) , 

SPACE= ( 102 4, (50,20)) 

SYSOUT=A 

PGM=*. LKED. SYSLMOD, COND= ( (5,LT,COB), (5,LT,LKED)) 

SYSOUT=A 



^ _ J 

Note ; You must provide a COB.SYSIN DD statement when you call the 
procedure. 

L J 

Figure 28. COBFCLG (Compile-Link Edit-Go) 
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//COB EXEC PGM=IKFCBL00,PARM='DECK,NOLOAD,SUPMAP'REGION=86K 

//SYSPRINT DD SYSOUT=A 

//SYS PUNCH DD SYSOUT=B 

//SYSUT1 DD DSNAME=6SSYSUTl,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYSUT2 DD DSNAME=SSSYSUT2,UNIT=SYSDA,SPACE=( 4 60, (700,100)) 

//SYSUT3 DD DSNAME=SSSYSUT3,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYSUT4 DD DSNAME=g&SYSUT4,UNIT=SYSDA,SPACE=(460, (700,100)) 



H- 



Note ; You must provide a COB.SYSIN DD statement when you call the 
procedure. 



H 



Figure 29. COBUC (Compile) 



//LKED 

//SYS LIN 

//SYSLMOD 

// 

//SYS LIB 

//SYSUT1 

// 

//SYSPRINT 

//GO 



h- 



EXEC PGM=IEWL,PARM=* LIST, XREF, LET* ,REGION=96K 

DD DSNAME=SSLOADSET 

DD DSNAME=£SGOSET(RUN) ,DISP= (NEW, PASS) ,UNIT=SYSDA, 

SPACE=(1024, (50,20,1)) 
DD DSNAME=S YS1 . COBLIB , DISP= SHR 
DD DSNAME=S&SYSUT1,UNIT=(SYSDA,SEP=(SYSLIN, SYSLMOD) ) , 

SPACE= (1024, (50,20)) 
DD SYSOUT=A 
EXEC PGM=* . LKED . SYSLMOD, COND= ( 5, LT, LKED) 



Note ; You must provide a LKED.SYSIN DD statement when you call the 
procedure. 



H 



Figure 30. COBULG (Link Edit-Go) 



//COB EXEC PGM=IKFCBL00,PARM=SUPMAP,REGION=86K 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSNAME=€SSYSUT1,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYSUT2 DD DSNAME=€SSYSUT2,UNIT=SYSDA,SPACE=(460, (700,100)) 

//SYSUT3 DD DSNAME=S&SYSUT3,UNIT=SYSDA,SPACE=( 4 60, (700,100)) 

//SYSUT4 DD DSNAME=SSSYSUT4,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYS LIN DD DSNAME=€SLOADSET, DISP= (MOD, PASS) , UNIT=SYSDA, 

// SPACE=(80, (500,100)) 

//LKED EXEC PGM=IEWL,PARM='LIST, XREF,LET' , COND=( 5,LT,COB) , 

// REGION=96K 

//SYSLIN DD DSNAME=SSLOADSET,DlSP= (OLD, DELETE) 

// DD DDNAME=SYSIN 

//SYSLMOD DD DSNAME=&€GOSET(RUN) , DISP= (NEW, PASS) , UNIT=SYSDA, 

// SPACE=(1024, (50,20,1)) 

//SYSLIB DD DSNAME=SYS1 . COBLIB, DISP=SHR 

//SYSUT1 DD UNIT=(SYSDA,SEP= (SYS LIN, SYSLMOD)) , 

// SPACE=(1024, (50,20)) 

//SYSPRINT DD SYSOUT^A 

//GO EXEC PGM=*. LKED. SYSLMOD, COND=(( 5, LT, COB), ( 5, LT, LKED)) 



H 



Note : You must provide a COB.SYSIN DD statement when you call the 
procedure. 

L_- . 

Figure 31. COBUCLG (Compile-Link Edit-Go) 
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//COB EXEC PGM=IKFCBLO , PARM= ' LOAD* ,REGION=86K 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSNAME=S&SYSUT1,UNIT=SYSDA,SPACE=U60, (700,100)) 

//SYSUT2 DD DSNAME=S&SYSUT2,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYSUT3 DD DSNAME=SSSYSUT3,UNIT=SYSDA,SPACE=(460, (700,100)) 

//SYSUT4 DD DSNAME=&SSYSUT4,UNIT=SYSDA,SPACE= (460, (700,100)) 

//SYSLIN DD DSNAME=£&LOADSET,DISP= (MOD, PASS), 
// UNIT=SYSDA,SPACE=(80, (500,100)) 

//GO EXEC PGM=LOADER,PARM="MAP,LET',COND=(5,LT,COB),REGION=106K 

//SYSLIN DD DSNAME=*. COB. SYSLIN, DISP=( OLD, DELETE) 

//SYS LOUT DD SYSOUT=A 

//SYSLIB DD DSNAME=SYSl.COBLIB,DISP=SHR 

|. _ j 

Note : You must provide a COB.SYSIN DD statement when you call the 
procedure. 

L 



Figure 32. COBUCG (Compile-Load) 
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//FORT 


EXEC 


PGM=IEJFAAAO, REGION=42K 


//SYSPRINT 


DD 


SYSOUT=A , DCB=BLKS I ZE=121 


//SYS PUNCH 


DD 


SYSOUT=B, DCB=BLKSIZE=8 


//SYSUT1 


DD 


DSN=£SYSUT1,UNIT=SYSSQ,SEP=SYSPUNCH, 


// 




SPACE=(904, (30, 20)) 


//SYSUT2 


DD 


DSN=£SYSUT2,UNIT=SYSSQ,SEP=SYSUTl, 


// 




SPACE=(904, (30,20)) 


//SYSLIN 


DD 


UNIT=S YSSQ , SEP=SYSPUNCH ,DSNAME=SLOADSET , 


// 




DISP=(MOD,PASS),SPACE=(80, (200,200)) 


r 

Note: You must provide a FORT.SYSIN DD statement when you call the 


procedure. 



H 



Figure 33. FORTEC (Compile) 



//FORT EXEC PGM=IEJFAAA0,REGION=42K 
//SYSPRINT DD SYSOUT=A, DCB=BLKSIZE=121 
//SYSPUNCH DD SYSOUT=B,DCB=BLKSIZE=80 

//SYSUT1 DD UNIT=SYSSQ,SEP=SYSPUNCH,SPACE=(904, (30,20)) 
//SYSUT2 DD UNIT=SYSSQ,SEP=SYSUTl,SPACE= (904, (30,20)) 
//SYSLIN DD UNIT=SYSSQ,SEP=SYSPUNCH,DSNAME=6LOADSET, 
// DISP=(MOD,PASS),SPACE=(80, (200,200) ,RLSE) 

//LKED EXEC PGM=IEWL,PARM= (XREF, LET, LIST, NCAL) , COND= (4 ,LT,FORT) , 
// REGION=96K 

//SYSPRINT DD SYSOUT=A,DCB=BLKSIZE=121 

//SYSLIN DD DSNAME=SLOADSET,DISP= (OLD, DELETE) ,DCB=BLKSIZE=80 
// DD DDNAME=SYSIN 

//SYSLMOD DD DSNAME=SYS1 ,FORTLIB,DISP=OLD 
//SYSUT1 DD DSN=SSYSUTl,UNIT=SYSDA,SEP=SYSLMOD, 
// SPACE=( 1024, (30,20)) 
j. ) 

Note : You must provide a FORT.SYSIN DD statement when you call the 
procedure. 



L 



: J 



Figure 34. FORTECL (Compile-Link Edit) 



r~ 

j //LKED 


EXEC 


1 

PGM=IEWL,PARM=(XREF,LET,LIST),REGION=9 6K | 


| //SYSPRINT 


DD 


SYSOUT=A,DCB=BLKSIZE=121 | 


| //SYSLIB 


DD 


DSNAME=SYSl.FORTLIB,DISP=SHR | 


j //SYSLIN 


DD 


DDNAME=SYSIN | 


| //SYSLMOD 


DD 


DSNAME= SGOSET (MAIN) , DISP= ( NEW, PASS ) , UNIT=SYSDA, | 


J // 




SPACE=(1024, (50,20,1) ,RLSE) | 


| //SYSUT1 


DD 


DSN=SSYSUT1,UNIT=SYSDA,SEP= (SYSLMOD, SYSLIB) , | 


1 // 




SPACE= (1024, (30,20) | 


| //GO 


EXEC 


PGM=*. LKED. SYSLMOD, COND= (4 f LT,LKED) | 


| //FT01F001 


DD 


DDNAME=SYSIN | 


| //FT02F001 


DD 


SYSOUT=B | 


| //FT03F001 

L 


DD 


SYSOUT=A | 

j 


r l 

| Note: You must provide a LKED. SYSLIN DD statement when you call the| 


| procedure. 1 



Figure 35. FORTELG (Link Edit-Go) 
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| //FORT 


DD 


PGM=IEJFAAA0,REGION=42K | 


j //SYSPRINT 


DD 


SYSOUT=A,DCB=BLKSIZE=121 j 


1 //SYS PUNCH 


DD 


SYSOUT=B,DCB=BLKSIZE=80 | 


| //SYSUT1 


DD 


DSN=£S YSUT1 , UNIT=S YSSQ , SEP=SYSPUNCH f | 


1 // 




SPACE=(904, (30, 20)) | 


| //SYSUT2 


DD 


DSN=&SYSUT2,UNIT=SYSSQ,SEP=SYSUT1,SPACE=(904, (30, 20)) | 


| //SYS LIN 


DD 


UNIT=SYSSQ, SEP=SYSPUNCH,DSNAME=gLOADSET # | 


1 // 




DISP=( MOD, PASS) ,SPACE=(80, (200,200) ,RLSE) | 


| //LKED 


EXEC 


PGM=IEWL,PARM=(XREF,LET,LIST),COND=(4,LT,FORT) , | 


1 // 




REGION=96K | 


| //SYSPRINT 


DD 


SYSOUT=A,DCB=BLKSIZE=121 j 


| //SYSLIB 


DD 


DSNAME=SYS1 . FORTLIB , DIS P=SHR | 


| //SYS LIN 


DD 


DSNAME= &LOADSET, DISP= ( OLD, DELETE) , DCB=BLKSIZE=8 j 


1 // 


DD 


DDNAME=SYSIN | 


| //SYSLMOD 


DD 


DSNAME= &GOSET (MAIN) , DISP= ( NEW, PASS) , UNIT=SYSDA , j 


1 // 




SPACE= (1024, (50,20,1) ,RLSE) j 


| //SYSUT1 


DD 


DSN=&SYSDT1 , UNIT=SYSDA, SEP= (SYSLMOD, SYSLIB) , | 


1 // 




SPACE=( 1024, (30,20)) j 


| //GO 


EXEC 


PGM=* . LKED . SYSLMOD , COND= ( ( 4 , LT , FORT ) , ( 4 , LT , LKED) ) j 


| //FT01F001 


DD 


DDNAME=SYSIN | 


| //FT02F001 


DD 


SYSOUT=B j 


| //FT03F001 
1- — — 


DD 


SYSOUT=A | 


r i 

I Note: You must provide a FORT.SYSIN DD statement when you call the | 


| procedure. j 



Figure 36. FORTECLG (Compile-Link Edit~Go) 
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FORTRAN G 



j //FORT EXEC PGM=IEYFORT,REGION=100K 

I //SYSPRINT DD SYSOUT=A 
SYSOUT=B 

DSNAME= SLOADSET,DISP=( MOD, PASS ),UNIT=SYSSQ, 
SPACE=(80, (200,100) ,RLSE) ,DCB=BLKSIZE-80 



| //SYSPUNCH DD 
| //SYSLIN DD 



Note: You must provide a FORT.SYSIN DD statement when you call the 
procedure. 



Figure 37. FORTGC (Compile) 



//FORT EXEC PGM=IEYFORT,REGION=100K 

//SYSPRINT DD SYSOUT=A 

//SYSPUNCH DD SYSOUT=B 

//SYSLIN DD DSNAME=SLOADSET, DISP= (MOD, PASS) ,UNIT~SYSSQ, 

// SPACE=(80, (200, 100),RLSE),DCB=BLKSIZE=80 

//LKED EXEC PGM=IEWL,REGION=96K,PARM= (XREF,LET,LIST) , 

// COND=(4,LT,FORT) 

//SYSLIB DD DSNAME=SYSl.FORTLIB,DISP=SHR 

//SYSLMOD DD DSNAME=SGOSET (MAIN) , DISP=( NEW, PASS) ,UNIT=SYSDA, 

// SPACE=(1024, (20,10,1) ,RLSE) ,DCB=BLKSIZE=1024 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSNAME=SSYSUT1,UNIT=SYSDA,SPACE=(1024, (20,10) ,RLSE) , 

// DCB=BLKSIZE=1024 

//SYSLIN DD DSNAME=SLOADSET,DISP=( OLD, DELETE) 

// DD DDNAME=SYSIN 

j. . < 

Note : You must provide a FORT.SYSIN DD statement when you call the 
procedure . 
i >* — 



Figure 38. FORTGCL (Compile-Link Edit) 



| //LKED 


EXEC 


PGM=IEWL,REGI0N=96K, PARM= (XREF, LET, LIST) 


| //SYSLIB 


DD 


DSNAME=SYS1 .FORTLIB,DISP=SHR 


| //SYSLMOD 


DD 


DSNAME= SGOSET (MAIN) , DISP= ( NEW , PASS ) , UNIT-SYSDA, 


1 // 




SPACE=(1024, (20,10,1) ,RLSE) ,DCB=BLKSIZE=1024 


j //SYSPRINT 


DD 


SYSOUT=A 


j //SYSUT1 


DD 


DSNAME=SSYSUT1,UNIT=SYSDA,SPACE=(1024, (20,10) ,RLSE) , 


1 // 




DCB=BLKSI ZE=1 02 4 


| //SYSLIN 


DD 


DDNAME=SYSIN 


| //GO 


EXEC 


PGM=* . LKED . SYSLMOD , COND= ( 4 , LT , LKED) 


| //FT05F001 


DD 


DDNAME=SYSIN 


| //FT06F001 


DD 


SYSOUT=A 


| //FT07F001 

L „_: . 


DD 


SYSOUT=B 


r — . 

\ Note: You must provide a LKED.SYSIN DD statement when you call the 


| procedure. 



H 



Figure 39. FORTGLG (Link Edit-Go) 
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PGM=IEYFORT, REGION=100K 

SYSOUT=A 

SYSOUT=B 

DSNAME=SLOADSET,DISP= (MOD, PASS) ,UNIT=SYSSQ, 

SPACE=(80, (200,100),RLSE),DCB=BLKSIZE=80 

PGM=IEWL,REGION=96K,PARM= (XREF, LET, LIST) , 

COND=U,LT,FORT) 

DSNAME=SYS1 . FORTLIB , DI SP= SHR 

DSNAME=&GOSET(MAIN) ,DISP=(NEW,PASS),UNIT=SYSDA, 

SPACE=(1024, (20,10,1) ,RLSE) ,DCB=BLKSIZE=1024 

SYSOUT=A 

DSNAME=&SYSUT1,UNIT=SYSDA,SPACE=(1024, (20,10) ,RLSE) , 

DCB=BLKSIZE=1024 

DSNAME= &LOADSET, DISP= (OLD, DELETE) 

DDNAME=SYSIN 

//GO EXEC PGM=*.LKED.SYSLMOD,COND=((4,LT,FORT)U,LT,LKED)) 

//FT05F001 DD DDNAME=SYSIN 

//FT06F001 DD SYSOUT=A 

//FT07F001 DD SYSOUT=B 



| //FORT 


EXEC 


| //SYSPRINT 


DD 


| //SYS PUNCH 


DD 


| //SYSLIN 


DD 


1 // 




| //LKED 


EXEC 


1 // 




| //SYSLIB 


DD 


| //SYSLMOD 


DD 


1 // 




j //SYSPRINT 


DD 


| //SYSUT1 


DD 


1 // 




J //SYSLIN 


DD 


1 // 


DD 



■i 



Note ; You must provide a FORT. SYS IN DD statement when you call the | 
procedure. j 

Figure 40. FORTGCLG (Compile-Link Edit-Go) 
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| //FORT EXEC PGM=IEKAA00,REGION=228K 

| //SYSPRINT DD SYSOUT=A 

| //SYSPUNCH DD SYSOUT=B 

j //SYSLIN DD DSNAME=gLOADSET,UNIT=SYSSQ,DISP=(MOD,PASS), 

I // SPACE=(400, (200,50) ,RLSE) 



h 



Note: You must provide a FORT. SYS IN DD statement when you call the 
procedure. 



Figure 41. FORTHC (Compile) 



//FORT EXEC PGM=IEKAA00,REGION=228K 

//SYSPRINT DD SYSOUT=A 

//SYSPUNCH DD SYSOUT=B 

//SYSLIN DD DSNAME=SLOADSET,UNIT=SYSSQ,DISP= (MOD, PASS), 

// SPACE=(400, (200,50),RLSE) 

//LKED EXEC PGM=IEWL,REGION=54K,PARM= (MAP, LET, LIST) r 

// COND=(4,LT,FORT) 

//SYSLIB DD DSNAME=SYSl.FORTLIB,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSLMOD DD DSNAME=SGOSET (MAIN) ,UNIT=SYSDA,DISP= (, PASS) , 

// SPACE= (3072) (30, 10,1), RLSE) 

//SYSLIN DD DSNAME=&LOADSET,DISP= (OLD, DELETE) 

// DD DDNAME=SYSIN 

//SYSUT1 DD DSNAME=SSYSUTl,UNIT=SYSDA,SPACE=(1024, (200,20)) , 

// SEP=SYSLMOD 



h 



■1 



j Note ; You must provide a FORT.SYSIN DD statement when you call the | 
procedure. J 

Figure 42. FORTHCL (Compile-Link Edit) 



//LKED EXEC PGM=IEWL,REGION=54K,PARM= (MAP, LET, LIST) 

//SYSLIB DD DSNAME=SYSl.FORTLIB,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSLIN DD DDNAME=SYSIN 

//SYSLMOD DD DSNAME= SGOSET (MAIN) , UNIT=STSDA, DISP= ( , PASS) , 

// SPACE= (3072, (30,10,1) , RLSE) 

//SYSUT1 DD DSNAME=£SYSUT1,UNIT=SYSDA,SPACE= (1024, (200,20)), 

// SEP=SYSLMOD 

//GO EXEC PGM=* . LKED . SYSLMOD , COND= (4 ,LT ,LKED) 

//FT05F001 DD DDNAME=SYSIN 

//FT06F001 DD SYSOUT=A 

//FT07F001 DD SYSOUT=B 



H- 



Note s You must provide a LKED. SYS IN DD statement when you call the 
procedure. 



H 



Figure 43. FORTHLG (Link Edit-Go) 
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r~ - 

| //FORT 


EXEC 


PGM=IEKAA00,REGION=228K | 


1 //SYSPRINT 


DD 


SYSOUT=A | 


| //SYS PUNCH 


DD 


SYSOUT=B | 


| //SYSLIN 


DD 


DSNAME=&LOADSET,UNIT=SYSSQ,DISP= (MOD, PASS) , j 


1 // 




SPACE=(400, (200,50),RLSE) j 


| //LKED 


EXEC 


PGM=IEWL,REGION=54K,PARM= (MAP, LET, LIST) , | 


1 // 




COND=(4,LT,FORT) j 


I //SYSLIB 


DD 


DSNAME=SYSl.FORTLIB,DISP=SHR j 


| //SYSPRINT 


DD 


SYSOUT=A | 


J //SYSLMOD 


DD 


DSNAME=SGOSET (MAIN) ,UNIT=SYSDA,DISP= ( , PASS) , | 


1 // 




SPACE=(3072, (30,10,,1),RLSE) | 


I //SYSUT1 


DD 


DSNAME=SSYSUTl,UNIT=SYSDA,SPACE=(102a, (200,20)) , | 


1 // 




SEP=SYSLMOD | 


1 //SYSLIN 


DD 


DSNAME=&LOADSET (MAIN) ,DISP= (OLD, DELETE) | 


I " 


DD 


DDNAME=SYSIN j 


1 //GO 


EXEC 


PGM=* . LKED . SYSLMOD, COND= ( ( 4, LT, FORT) , ( 4 , LT, LKED) ) | 


| //FT05F001 


DD 


DDNAME=SYSIN | 


| //FT06F001 


DD 


SYSOUT=A | 


I //FT07F001 
!,_„. . 


DD 


SYSOUT=B j 

_ .. - ._ .. _ J 


r — - - t 
1 Note: You must provide a FORT. SYS IN DD statement when you call the | 


| procedure * | 



Figure 44. FORTHCLG (Compile-Link Edit-Go) 




FORTRAN H 359 



PL/I F 



//PL1D EXEC PGM=IEMAA, PARM= 'DECK, NOLOAD' , REGION=52K 
//SYS PRINT DD SYSOUT=A 

SYSOUT=B 

DSNAME=&SSYSUT3,UNIT=SYSSQ,SPACE=(80, (250,250)), 

SEP=SYSPRINT 

DSNAME=€SSYSUTl f UNIT=SYSDA,SPACE=( 1024, (60,60), 

CONTIG) ,SEP= (SYSUT3, SYSPRINT, SYSPUNCH) 



//SYSPUNCH DD 

V/SYSUT3 DD 

// 

//SYSUT1 DD 

// 



Note ; You must provide a PL1D.SYSIN DD statement when you call the 
procedure. 

L_ 

Figure 45. PL1DFC (Compile With Deck Output) 



//PL1L EXEC PGM=IEMAA,PARM= , LOAD,NODECK , ,REGION=52K 
//SYSPRINT DD SYSOUT=A 

DD DSNAME= S &LOADSET, DISP= ( MOD, PASS ) , UNIT=SYSSQ, 

SPACE=(80, (250,100)) 
DD DSNAME=S&SYSUT3,UNIT=SYSSQ,SPACE=(80, (250,250)), 

SEP=SYSPRINT 
DD DSNAME=SSSYSUTl,UNIT=SYSDA,SPACE=(1024, (60,60), 
CONTIG) ,SEP= (SYSUT 3, SYSPRINT, SYSLIN) 



//SYSLIN 

// 

//SYSUT3 

// 

//SYSUT1 

// 



Note ; You must provide a PL1L.SYSIN DD statement when you call the 
procedure. 

i . . . 

Figure 46. FL1LFC (Compile With Object Module Output 



H- 



PGM=IEMAA, PARM= * LOAD , NODECK* , REGION=52K 

SYSOUT=A 

DSNAME=S6LOADSET,DISP= (MOD, PASS) ,UNIT=SYSSQ, 

SPACE=(80, (250,100)) 

DSNAME=g6SYSUT3 , UNIT=SYSSQ , SPACE= (80,(250,250)), 

SEP=SYSPRINT 

DSNAME=6&SYSUT1,UNIT=SYSDA,SPACE=(1024, (60,60) ,, 

CONTIG), SEP=(SYSUT3, SYSPRINT, SYSLIN) 

PGM=IEWL,PARM=* XREF, LIST' , COND=( 9, LT, PLlL) , 

REGION=96K 

DSNAME=SYS1 . PLlLIB, DISP=SHR 

DSNAME=g&GOSET(GO) ,DISP= (MOD, PASS) , UNIT=SYSDA, 

SPACE=(1024, (50,20, 1),RLSE) 

DSNAME=gSSYSUTl,UNIT=SYSDA,SEP= (SYSLMOD,SYSLIB) , 

SPACE=(1024, (200, 20)) 

SYSOUT=A 

DSNAME=€&LOADSET, DISP= (OLD, DELETE) 

DDNAME=SYSIN 

Note ; You must provide a PLlL. SYS IN DD statement when you call the 
procedure. 



//PLlL 


EXEC 


//SYSPRINT 


DD 


//SYSLIN 


DD 


// 




//SYSUT 3 


DD 


// 




//SYSUT1 


DD 


// 




//LKED 


EXEC 


// 




//SYS LIB 


DD 


//SYSLMOD 


DD 


// 




//SYSUT1 


DD 


// 




//SYSPRINT 


DD 


//SYSLIN 


DD 


// 


DD 


Note; You musi 



Figure 47. PL1LFCL (Compile-Link Edit) 
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//LKED EXEC PGM=IEWL,PARM=* XREF, LIST* ,REGION=96K 

//SYSLIB DD DSNAME=SYS1.PL1LIB, DISP=SHR 

//SYSLMOD DD DSNAME=SSGOSET(GO) , DISP= (MOD, PASS) , 

// UNIT=SYSDA,SPACE=(1024, (50,2 0, 1) , RLSE) 

//SYSUT1 DD DSNAME=SSSYSUT1,UNIT=SYSDA,SEP= (SYSLMOD, SYSLIB) , 

// SPACE=(1024, (200,20)) 

//SYSPRINT DD SYSOUT=A 

//SYSLIN DD DDNAME=SYSIN 

//GO EXEC PGM=* . LKED . SYSLMOD, COND= ( 9 , LT, LKED) 

//SYSPRINT DD SYSOUT=A 

j. ., 

Note : You must provide a LKED.SYSIN DD statement when you call the 
procedure. 

i j 



Figure 48. PL1LFLG (Link Edit-Go) 



r 

| //PL1L 


EXEC 


PGM=IEMAA, PARM= *LOAD, NODECK* , REGION=52K 


| //SYSPRINT 


DD 


SYSOUT=A 


| //SYSLIN 


DD 


DSNAME=SSLOADSET, DISP= (MOD, PASS) , 


1 // 




UNIT=SYSSQ , SPACE= ( 8 , (250,100)) 


| //SYSUT3 


DD 


DSNAME=€SSYSUT3,UNIT=SYSSQ,SPACE=(80, (250,250)), 


1 // 




SEP=SYS PRINT 


| //SYSUT1 


DD 


DSNAME=£SSYSUT1,UNIT=SYSDA,SPACE=(1024, (60,60),, 


1 // 




CONTIG) ,SEP= (SYSUT3, SYSPRINT, SYSLIN) 


| //LKED 


EXEC 


PGM= IEWL, P ARM= ■ XREF, LIST * , 


1 // 




COND= ( 9 , LT , PL1L) , REGION=96K 


| //SYSLIB 


DD 


DSNAME=SYSU.PL1LIB, DISP=SHR 


| //SYSLMOD 


DD 


DSNAME=SSGOSET(GO) ,DI 


1 // 




SP= (MOD , PASS) , UNIT=SYSDA, SPACE=( 1024 , ( 50 , 20 , 1) , RLSE) 


| //SYSUT1 


DD 


DSNAME=££SYSUTl,UNIT=SYSDA,SEP=(SYSLMOD, SYSLIB) , 


1 // 




SPACE=(1024, (200,20)) 


| //SYSPRINT 


DD 


SYSOUT=A 


| //SYSLIN 


DD 


DSNAME=SSLOADSET,DISP= (OLD, DELETE) 


1 // 


DD 


DDNAME=SYSIN 


| //GO 


EXEC 


PGM=* . LKED . SYSLMOD , COND= ( ( 9 , LT , LKED) , ( 9 , LT , PL1L) ) 


| //SYSPRINT 

L 


DD 


SYSOUT=A 


r 

I Note: You must provide a PL1L.SYSIN DD statement when you call the 


| procedure. 



H 



Figure 49. PL1LFCLG (Compile-Link Edit-Go) 



//PL1L EXEC PGM=IEMAA,PARM= , LOAD,NODECK',REGION=52K 

//SYSPRINT DD SYSOUT=A 

//SYSLIN DD DSNAME=&&LOADSET,DISP= (MOD, PASS ),UNIT=SYSSQ, 
// SPACE=(80, (250,100)) 

//SYSUT3 DD DSNAME=S&SYSUT3,UNIT=SYSSQ,SPACE=(80, (250,250)) , 
// SEP=SYSPRINT 

//SYSUT1 DD DSNAME=&SSYSUT1,UNIT=SYSDA,SPACE=(1024, (60,60)),, 
// CONTIG) , SEP= ( SYSUT3, SYSPRINT, SYSLIN) 

//GO EXEC PGM=LOADER , PARM= • MAP , PRINT • , REGION=9 6K , 
// C0ND=(9,LT,PL1L) 

//SYSLIB DD DSNAME=SYS1.PL1LIB,DISP=SHR 

//SYSLIN DD DSNAME=6&LOADSET,DISP= (OLD, DELETE) 

//SYSLOUT DD SY30UT=A 

//SYSPRINT DD SYSOUT=A 

^ , 

Note : You must provide a PL1L.SYSIN DD statement when you call the 
procedure. 

L J 




Figure 50. PL1LFCG (Compile-Load) 
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j //GO EXEC PGM=LOADER , PARM= ' MAP , PRINT* , REGION=9 6K 

| //SYSLIB DD DSNAME=SYS1.PL1LIB,DISP=SHR 
j //SYSOUT DD SYSOUT=A 



| //SYSPRINT DD SYSOUT=A 

L _ 


1 
i 


1 Note; You must provide a GO.SYSIN DD statement when you call the | 
j procedure. | 
i _ - - _ j 



Figure 51. PL1LFG (Load) 



Examples 

1. The following example shows how to call the ALGOFCLG cataloged 

procedure. The source program is in the input stream. No changes 
are made to the procedure. 

r 1 

//EX1 JOB 

//STEP EXEC ALGOFCLG 

//ALGOL. SYSIN DD * 

source program 
/* 

l . . : i 

The following example shows how to call the ASMEC cataloged 
procedure. You want to change the SYSPUNCH DD statement to define 
a kept data set on tape named OBJMOD. The source program is in the 
input stream. 



//EX2 JOB 

// EXEC PROC=ASMEC 

//ASM. SYS PUNCH DD UNIT=2400, DSNAME=OBJMOD, DISP=( ,KEEP) 

//ASM. SYSIN DD * 

source program 
/* 



The following example shows how to call the ASMFCL cataloged 
procedure. You want to change the SYSLMOD DD statement to define 
member #3 of a cataloged data set named SYST.LIB. The source 
program is in the input stream. 



//EX3 JOB 

// EXEC ASMFCL 

//ASM. SYS IN DD * 

source program 
/* 
//LKED . SYSLMOD DD DSNAME=SYST. LIB (#3) , DISP= ( ,CATLG) 
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The following example shows how to call the COBELG cataloged 
procedure. You want to change the REGION parameter of the LKED 
EXEC statement to REGION=120K, and to change the PARM parameter to 
show MAP rather than XREF. You also want to add a TIME=5 parameter 
to the GO EXEC statement. The object program is on a 2501 card 
reader. You are adding two DD statements to the GO step. 





//EX4 


JOB 




//CALL 


EXEC 




// 






//LKED.SYSIN 


DD 




//GO.UTIL 


DD 


1 


//GO. INPUT 


DD 


input 


data 



I /* 



COBELG, REGION. LKED=120K, PARM. LKED= (MAP, 
LIST, LET), TIME. GO=5 
UNIT=2501 
UNIT=2314,SPACE=(CYL, (20,5)) 

* 



The following example shows two steps of a job. The first step 
calls the FORTGCL cataloged procedure. A value of OBJECT is 
assigned &LOADSET symbolic parameter and the DISP parameter is 
changed to DISP= (OLD, KEEP) in the SYSLIN DD statement of the LKED 
step. The second step of the job executes the program produced by 
the linkage editor in the data set defined by the SYSLMOD DD 
statement. 

Note : IBM-supplied cataloged procedures do not use symbolic 
parameters. However, in this case, you can take advantage of the 
fact that SLOADSET is in symbolic parameter form to assign it a 
different value with the EXEC statement. 



FORTGCL, LOADSET=OBJECT 

* 



//EX5 JOB 

//STEP1 EXEC 
//FORT.SYSIN DD 

source program 
/* 

//LKED . SYSLIN DD DISP= (OLD, KEEP) 
//STEP2 EXEC PGM=*. STEP 1. LKED. SYSLMOD 



The following example shows how to call the PL1LFCLG cataloged 
procedure. You want the object module to be on a 2400 unit. 
Therefore you must change the UNIT parameter of the SYSLIN DD 
statement and nullify the SPACE parameter. You also want to 
nullify the COND parameter of the GO step. 



//EX6 JOB 

// EXEC 

//PL1L. SYSLIN DD 
//PL1L.SYSIN DD 

source program 
/* 



PR0C=PL1LFCLG , COND. GO= 
UNIT=2400, SPACE= 



Part V 



L_. 
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7. The following example shows how to call the COBUCG cataloged 

procedure. The source program is in the input stream. You are 
adding two DD statements to the GO step that are required by your 
loaded program for execution. 



| //EX7 


JOB 




1 // 


EXEC 


COBUCG 


J //COB.SYSIN 


DD 


* 

source program 


1 /* 






| //GO. DATA 


DD 


DSNAME=RECORDS, DISP=OLD 


| //GO. OUTPUT 


DD 


SYSOUT=F 
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Appendix A: Indexed Sequential Data Sets 



Indexed sequential (ISAM) data sets are created, retrieved, and 
overwritten using special subsets of DD statement parameters and 
subparameters. Each data set can occupy up to three different areas of 
space: 

1. Prime area — This area contains data and related track indexes. 
It exists for all indexed sequential data sets. 

2. Overflow area — This area contains overflow from the prime area 
when new data is added. It is optional. 

3 . Index area — This area contains master and cylinder indexes 
associated with the data set. It exists for any indexed sequential 
data set that has a prime area occupying more than one cylinder. 
Indexed sequential data sets must reside on direct access volumes. 

The data set can reside on more than one volume and the device types of 
the volumes may in some cases differ. 

Creating an Indexed Sequential Data Set 

One to three DD statements can be used to define a new indexed 
sequential data set. There are four types of indexed sequential data 
sets: 

• Separate index, prime and overflow areas — The DD statements that 
define each area must be coded in the following order: 

1. Index area 

2. Prime area 

3. Overflow area 

• Separate index and prime areas — No overflow area. The DD 
statements that define each area must be coded in the following 
order : 

1. Index area 

2. Prime area 

• Separate prime and overflow areas — The index area is part of the 
prime area. The DD statements that define each area must be coded 
in the following order: 

1. Prime area 

2. Overflow area 

• Prime Area Only — The index area is part of the prime area. Only 
the DD statement that defines the prime area must be coded. 

When more than one DD statement is used to define the data set, 
assign a ddname only to the first DD statement; the name field of the 
other statements must be blank. In other words, concatenate the DD 
statements . 

Table 60 shows the parameters required to define each area. The 
parameters for the three areas are discussed together in the following 
paragraphs. For further information on the parameters refer to "Direct 
Access Devices" in the section "Creating a New Data Set." 
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Table 60. Parameters for Creating an Indexed Sequential Data Set (Part 
1 of 2) 



i t t r 

| Area | Parameter type j Parameter! 
j. + + + 

Index 1 Data set information I DSNAME 



Comments 



H 



h 



H- 



Location of the data set 



Size of the Data Set 



-+ 



Data Attributes 



Special Processing Option 



DISP 



UNIT 



VOLUME 



LABEL 



SPACE 



DCB 



SEP 
AFF 



H 



Required, You must 

code 

DSNAME=ds name (INDEX) or 

DSNAME=Sdsname (INDEX) 



Required. You must 
code the same value as 
in the DD statement for 
the prime area. 



H 



Required unless you 
request (with the 
VOLUME parameter) the 
same volume used for an 
earlier data set. Only 
one unit can be 
requested. 



Required if you want a 
specific volume. 



Optional . 
Required . 



H 



Required. 



Either parameter can be 
used. 



H 



Prime 



Data Set information 



DSNAME 



Required. You must 

code: 

DSNAME=dsname (PRIME) , 
DSNAME=Sdsname ( PRIME) 
DSNAME= ds name , or 
DSNAME=6dsname 



H 



DISP 



I" 



Required , 



H 



Location of the data set 



UNIT 



Required unless you 
request (with the 
VOLUME parameter) the 
same volume used for an 
earlier data set. 



VOLUME 



Required if you want a 
specific volume or 
multiple volumes. 



•H 



t +- 

| LABEL | 

-JL . X- 



Optional. 
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Table 60. Parameters for Creating an Indexed Sequential Data Set (Part 
2 of 2) 



I 



Area 



Parameter type 



Parameter 



Comments 



Prime 
( Cont . ) 



Size of the data set 



Data Attributes 



Special Processing Option 



SPACE 



DCB 



SEP 



AFF 



Required. If you do not 
include a DD statement 
for the index area you 

can either specify an 
"index quantity" or let 
the system assign the 
index area. 



Required . 



Either parameter can be 
used. 



Overflow 



Data set Information 



DSNAME 



Required. You must 
code DSNAME=dsname 
(OVFLOW) or 
DSNAME= Sds name ( OVFLOW) . 



K- 



DISP 



Required. You must 
code the same value as 
in the DD statement for 
the prime area. 



Location of the data set 



UNIT 



Required unless you 
request (with the 
VOLUME parameter) the 
same volume used for an 
earlier data set. 



H- 



VOLUME 



Required if you want a 
specific volume. 



H 



LABEL 



Optional. 



H 



Size of the data set 



SPACE 



Data Attributes 



DCB 



Required. 
Required. 



H 



Special Processing Option 



SEP 
AFF 



Either parameter can be 
used. 
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DATA SET INFORMATION 

The DSNAME and DISP parameters are required on any DD statement used 
to define an indexed sequential data set. 



DSNAME Parameter 

The DSNAME parameter is required on the DD statement that defines each 
of the areas. The general format is: 

r _. . 7 

: Jdsname(area) 
( Sdsname(area; 



L. 



DSNAME=/dsname(area) ) \ 



Replace the term "dsname" with the fully qualified, unqualified, or 
temporary name of the data set. Whichever name you use, you must use 
the same name of the DD statement for each area. The term "area" 
indicates which area you are defining as decribed below. 

Index area : The format of the DSNAME parameter for the index area is : 

DSNAME=(dsname(INDEX) \ 
(Sdsname (INDEX)/ 

For example, 

DSNAME=SET. TWO (INDEX) 
DS NAME= AREA ( INDEX ) 
DSNAME= 6TEMP (INDEX) 

Prime area : The format of the DSNAME parameter for the prime area is: 

DSNAME= (dsname (PRIME) ) 
\s dsname (PRIME)/ 
For example, 

DSNAME=SET. TWO (PRIME) 
DSNAME=AREA( PRIME) 
DSNAME= 6TEMP ( PRIME) 

If you are using only one DD statement to define the data set, you may 
omit the term (PRIME). For example: 

DSNAME=SET.TWO 

DSNAME=AREA 

DSNAME=£TEMP 



Overflow area : The format of the DSNAME parameter for the overflow 
area is : 

DSNAME=( dsname (OVFLOW) ) 
( &dsname( OVFLOW) J 

For example, 

DSNAME=SET . TWO ( OVFLOW ) 
DSNAME=AREA (OVFLOW) 
DSNAME= STEMP ( OVFLOW) 
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DISP Parameter 



The format of the DISP parameter is: 



| DISP = ( NEW 



[ ". delete] ) 

[,KEEP J 



You may omit the DISP parameter if you are creating and deleting the 
data set in the same job step. 

Index area ; You must specify the same value you specify for prime 
area. 

Prime area : If you have separate DD statements for an index or 
overflow area, or both, you can only specify 

DISP=(,KEEP) 

If you are defining the data set with only one DD statement area you 
can specify 

DISP=(,CATLG) or DISP=(,PASS) 

If the data set was defined on more than one DD statement and the 
volumes on which the data set resides corresponds to the same device 
"type, Y ou can use the IEHPROGM utility program to catalog the data 
set. Refer to "The IEHPROGM program" in the publication IBM 
System/360 Operating System: Utilities for details. 

Overflow area : You must specify the same value you specify for the 
prime area. 



LOCATION OF THE DATA SET 

The location of each area of the data set is given by the UNIT and 
VOLUME parameter. The LABEL parameter is optional. 



UNIT Parameter 

The UNIT parameter indicates which kind of direct access device you 
want. The format of the UNIT parameter is: 



{unit address) 
device type \ 
groupname J 



, unit count ) 

.' p J 



The first positional parameter identifies the direct access device you 
want to use for the area. 



unit address 

is the actual machine address of the device. For example 
UNIT=190 

device type 

is the type of device. You can specify a 2301, 2302, 2303, 
2305-1, 2305-2, 2311, 2314, 2321, 3330. To indicate the 2319, 
specify UNIT=2314. However, to designate the 2319 as the 
particular device for your data set, specify UNIT=unit address, 
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groupname 

is the name of a collection of devices. For example, UNIT=DISK 

The second positional parameter can be used only for the prime area 
when more than one volume are requested in the VOLUME parameter. You 
can either request a number of devices or parallel mounting. 

Index area : You can request only one device. It does not have to be 
the same kind of device as the one used for the prime area. For 
example, the index area could be on a 2301 and the prime area on a 
2314. 

Prime area : If there are separate DD statements defining the prime 
and index areas, you must request the same number of direct access 
devices for the prime area as there are volumes specified in the 
VOLUME parameter. 

Overflow area : You can request only one device. It does not have to 
be the same kind of device as the one used for the prime area. For 
example, the prime area could be on a 2314 and the overflow on a 2311. 



VOLUME Parameter 

The VOLUME parameter for each of the areas is used in the same manner 
as for other data sets on direct access devices. The format of the 
VOLUME parameter is: 

i 

j VOLUME= ( [ PRI VAT E] 



[, RETAIN ~| (" , , volcount J|[sER= (serial, . . . )"| ) 
, J I ' J |ref= reference J 



The volcount parameter and multiple serial numbers can only be used 
for the prime area. 

Index area : You can make a specific or nonspecific request for any 
public or private volume. You can request only one volume. It can be 
one of the volumes used for the prime area, or the volume used for the 
overflow area. 

Prime area : You can request multiple volumes even though a secondary 
quantity is not allowed in the SPACE parameter for an indexed 
sequential data set. 

You can only request one volume if the prime and index areas are 
defined in the same DD statement. You define the index area in the 
same DD statement by specifying an "index quantity" in the SPACE 
parameter of the DD statement that defines the prime area and by 
omitting the DD statement for the index area. 

Overflow area : You can make a specific or nonspecific request for any 
public or private volume. You can request only one volume. It can be 
one of the volumes used for the prime area* or the volume used for the 
index area. 

Note : If you request nonspecific volumes and use more than one DD 
statement to define the data set, you will not be able to retrieve the 
data set in another step of the same job . (See the description of the 
VOLUME parameter in "Retrieving or Extending an Indexed Sequential 
Data Set.") 
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LABEL Parameter 

The LABEL parameter need only be coded to specify password protection 
(PASSWORD) or a retention period (EXPDT or RETPD) . You must specify 
the same parameter for each area defined. 

SIZE OF THE DATA SET 

You must use the SPACE parameter to indicate the size of each area of 
the data set. The SPACE parameter lets you request space for your 
data set in one of two ways: 

1. You can request a number of cylinders and let the system assign 
them specific tracks, or 

2. You can request specific tracks. 

If more than one DD statement is used to define the data set, all 
must request space using the same technique. 



SPACE Parameter-The System Assigns Tracks 
The format of the SPACE parameter is : 



| SPACE= (CYL, (primary quantity [, , index] ) 3 , , CONTIG] ) 

L , r 

The space must be requested in units of cylinders. Replace 
"primary quantity" with the number of cylinders you want. The "index" 
can only be specified for the prime area as described below. You may 
request contiguous space with the CONTIG parameter. 

Index area : If you code CONTIG for the index area, you must also code 
it for the other areas. 



Prime area : If you code CONTIG for the prime area, you must also code 
it for the other areas. 

If you request more than one volume with the VOLUME parameter, each 
volume is assigned the number of cylinders requested in the primary 
quantity. (A secondary quantity is not allowed for indexed sequential 
data sets . ) 

If you do not define an index area with a separate DD statement, 
you can choose to have an index area embedded in the prime area, or ~ 
placed at the end of the prime area. ~"~" 

• Embedded in the prime area — You must specify the number of 
cylinders required for the index area with the "index" 
subparameter. For example, if you want a primary allocation of 10 
cylinders and an index area of two cylinders code 

SPACE=(CYL, (10, , 2)) . If you use an index quantity the prime area 
must reside on only one volume. 

• End of the Prime Area — You must increase the primary quantity by 
the number of cylinders required for the index area. For example, 
if you want a primary allocation of five cylinders and an index 
area of one cylinder, code 

SPACE=(CYL, 6) 
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Overflow area ; If you code CONTIG for the overflow area, you must 
also code it for the other areas. 



SPACE Parameter-Requesting Specific Tracks 
The format of the SPACE parameter is : 

r ' 1 

1 I 

| SPACE= (ABSTR, (primary quantity, address, index )) | 

L ; _- J 

The number of tracks you request must be equal to one or more whole 
cylinders. The address of the beginning track must correspond with 
the first track of a cylinder (other than the first cylinder on the 
volume) . The "index" can only be specified for the prime area as 
specified below. 

Prime Area ; If you request more than one volume with the VOLUME 
parameter, space is allocated for the prime area beginning at the 
specified address and continuing through the volume and onto the next 
volume until the request is satisfied. This can only be done if the 
volume table of contents (VTOC) of the second and all succeeding 
volumes is contained within the first cylinder of each volume. 

If you do not define an index area with a separate DD statement, 
you can choose to have an index area embedded in the prime area or 
placed at the end of the prime area. 

• Embedded in the prime area — You must specify the number of 
tracks required for the index area with the "index" subparameter. 
The number of tracks must be equal to one or more cylinders. If 
you use an index quantity, the prime area must reside on only one 
volume . 

• End of the prime area — You must increase the primary quantity by 
the number of tracks required for the index area. The total 
number must be equal to one or more cylinders. 

DATA ATTRIBUTES 

The DCB parameter must be coded on every DD statement that defines an 
indexed sequential data set. You roust code DSORG=IS or DSORG=ISU. 
Other DCB subparameters can be coded as required by the language you 
are using. Indexed sequential data sets can only be used with the 
assembler, COBOL and PL/1. Table 61 shows the DCB subparameters used 
for each language. Underscored items are those default values 
selected if you omit the subparameter. Default values are not shown 
where the attribute can be specified either in your program or in the 
DD statement. If values for a given parameter are not shown, it is 
either specified in your source program or given a fixed value by the 
compiler. A glossary of DCB subparameter is given in Appendix B. 
Code only those parameters that apply to your compiler as shown in 
Table 61. 

When more than one DD statement is used to define the data set, 
code all the DCB subparameters on the first DD statement. Code 
DCB=*.ddname on the remaining statement or statements; ddname is the 
name given to the first DD statement. (You can repeat the complete 
DCB parameter in each of the remaining DD statements, but the backward 
reference saves you time and eliminates the possibility of error.) 
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Table 61. DCB Subparameters for Creating an Indexed Sequential Data Set 







H 

& 
(D 
X 
(D 
Pj 

en 

<T> 
vQ 
C 
fl> 

» 

0> 
H 

D 
Oi 
ft 
0> 

W 
fl> 
ft 
W 



DCB 
Subparameter 


Assembler 


COBOL E 


COBOL F 


Li 

ANS COBOL ' — 


PL/I F 


BFALN= 


Ll 

ForD 










BLKSIZE= 


Li 

number of bytes 




Ll 

number of bytes 


number of bytes 


Ll 

number of bytes 


BUFNO= 


Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


Ll 

number of buffers 


CYLOFL= 


Ll 

number of tracks 




Ll 

number of tracks 


number of tracks 


number of tracks 


DSORG= 


IS or ISU 


IS 


IS 


IS 


IS 


HIARCHY= 


LL 

Oor 1 










KEYLEN= 


LL 

number of bytes 








number of bytes 


LRECL= 


Ll 

number of bytes 








Ll 

number of bytes 


NTM= 


Ll 

number of tracks 




number of tracks 


number of tracks 


number of tracks 


OPTCD= 


[w] [Ml MM Modu- 




Lw][m][y][i][l][r] 


[w][m][y][i][l][r] 


[w][m][y][.][l] 


RECFM= 


li 

V[B] orF[B] 








h 

V[B] orF[B] 


RKP= 


Ll 

byte number 








byte number 


This function can be specified in your program rather than in the DD statement. 
American National Standard COBOL. 



u» 
-J 



Retrieving or Extending an Indexed Sequential Data Set 

A maximum of three DD statements are needed to retrieve or extend an 
indexed sequential (ISAM) data set. The DD statements are coded in 
the following order: 

1. First DD statement - defines the indexed area 

2. Second DD statement - defines the prime area 

3. Third DD statement - defines the overflow area 

Only the second DD statement is required. The first DD statement is 
not needed if either the index area resides on a volume of the same 
type as the prime area or if the index area is part of the prime area. 
The third DD statement is not needed if either the overflow area 
resides on a volume of the same type as the prime area or if there is 
no overflow area. When the first or third DD statements, or both, are 
not needed the definition of the index or overflow areas are included 
in the DD statement for the prime area. 

Table 62 shows the parameters required for each DD statement. The 
parameters for all three DD statements are discribed together in the 
following paragraphs. 



Table 62. Parameters for Retrieving or Extending an Indexed 
Sequential Data Set (Part 1 of 2) 



T * T T" 

Area j Parameter Type | Parameter | 
+ + + . 



Comments 



Index (used only 
if index area 
not on same 
device type as 
prime area) 



(First DD 
statement) 



l~ 



I— 



Data Set 
Information 



Location of 
the data set 



Data 
Attributes 



DSNAME 



DISP 



UNIT 



VOLUME 



DCB 



Required. You must code 
the same value as in 
second DD statement. 



H 



Required. You must code 
the same value as in 
second DD statement. 



Required. 



Required 



Required , 



H 



H 



H 



Prime and Over- 
flow; or Index, 
Prime, and 
Overflow; or 
Indexed and 
Prime (required) 



(Second DD 
statement) 



Data Set 
Information 



DSNAME 



Required. 



DISP 



Required. Specifies 
whether you are 
retrieving the data set. 



Location of 
the data set 



UNIT 



Required. Unless it is 
a passed data set with 
all three area on one 
volume . 



VOLUME 



I— 



Same requirement as UNIT. 
If used, code volumes in 
order they were defined. 



Data 
Attributes 



H 



DCB 



Required. 
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Table 62. Parameters for Retrieving or Extending an Indexed Sequential 
Data Set (Part 2 of 2) 



Area 



_ T T T" 

| Parameter Type | Parameter | 



Comments 



H 



Overflow (used 
only if overflow 
area not on same 
device type as 
prime area) 



(Third DD 
statement) 



Data Set 
Information 



h- 



Location of 
the data set 



-+ 



Data 
Attributes 



DSNAME 



DISP 



UNIT 



h~ 



VOLUME 



DCB 



Required. You must code 
the same value as in 
second DD statement 



Required. You must code 
the same value as in the 
second DD statement 



H 



Required, 



Required, 
Required , 



H 



DATA SET INFORMATION 

The DSNAME and DISP parameters are required. 

DSNAME Parameter 

The format of the DSNAME parameter is: 



Idsname 
gdsname 
* . stepname. ddname 
* . stepname. proc stepname. ddname 



Identify the data set by its name, but do not include the term INDEX, 
PRIME or OVFLOW. If the data set was passed from a previous step, you 
can identify it by a backward reference as long as it was dh only one DD 
statement. 

First DD statement ; You must code the DSNAME parameter exactly as you 
code it in the second DD statement. You must not code the term INDEX. 

Second DD statement : You must not code the term PRIME or OVFLOW. 

Third DD Statement: You must not code the term OVFLOW. 



DISP Parameter 



The format of the DISP parameter is: 



{SHR) 
OLD> 
mod) 



",PASS 
, DELETE 
,KEEP 
, CATLG 
,UNCATLG 
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You must code either SHR, OLD or MOD. SHR specifies that you are 
retrieving the data set and that it can be shared with other jobs. OLD 
specifies that you are retrieving the data set. MOD specifies that you 
are extending the data set. You can, optionally, assign a disposition 
as the second subparameter. The same restrictions for PASS and CATLG 
apply as when you created the data set. 

First DP Statement : You must code the DISP parameter exactly as you 
code it in the second DD statement. This first DD statement is used 
when the index area resides on a different device type from the prime 
area . 

Third DD Statement ; You must code the DISP parameter exactly as you 

coded it in the second DD statement. This third DD statement is used 

when the overflow area resides on a volume of a different device type 
from the prime area. 



LOCATION OF THE DATA SET 

You must use the UNIT and VOLUME parameter unless the data set was 
passed and had all three areas on the same volume, or unless the data 
set was cataloged. 

UNIT Parameter 

The format of the UNIT parameter is : 



r 

| (unit address} 

| UNIT=(< device type } f,unit count"J ) 

| (groupname 

L 



U; 



The first positional parameter identifies the direct access device 
you want to use for the data set. The second positional parameter 
cannot be used in the first DD statement. 

First DP statement ; The device you specify must not be of the same type 
as the one specified in the second DD statement. (If they are of the 
same type, you do not need the first DD statement.) You can only 
request one device because the index area can only reside on one volume. 

Second DD Statement ; You must request the same number of devices as 
there are volumes specified in the VOLUME parameter. If you request 
parallel mounting you do not have to count the volumes. 

Third DD Statement ; The device you specify must not be of the same type 
as the one specified in the second DD statement. (If the device type 
for the prime area is the same as that for the overflow area, you do not 
need a third DD statement.) 
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VOLUME Parameter 

The VOLUME parameter identifies the volumes on which your data set 
resides. The format of the VOLUME parameter is: 

i ■ 1 

I VOLUME= (SER= (serial, . . . )) | 

| \REF=reference J | 

L J 

You can only specify one serial number in the first or third DD 
statement. You can only use the REF subparameter if the data set was 
defined with only one DD statement or if the data set was cataloged. If 
the data set was defined with more than one DD statement, making a 
backward reference would only get you the volumes assigned to the first 
DD statement . 

First DD Statement : Specify the serial number of the volume that has 
the index area. This first DD statement is used when the index area 
resides on a volume of a different device type from the prime area. 

Second DD statement : Code the serial numbers in the same order as they 
were coded on the DD statements used to create the data set. (See 
"Examples" .) 

Third DP Statement : Specify the serial number of the volume that has 
the overflow area. This third DD statement is used when the overflow 
area resides on a volume of a different device type from the prime area. 



DATA ATTRIBUTES 

You can omit the DCB parameter if the data set was passed from a 
previous step. If the data set was kept or cataloged you must code 
DSORG=IS. Other parameters you may code are shown in Table 63. 
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Table 63. DCB Subparameters for Retrieving an Indexed Sequential Data 
Set 



O 

G 
W 
fl> 
h 






w 

H 

CD 
W 
<D 

(O 
O 



DCB 
Subparameter 


Assembler 


COBOL E 


COBOL F 


I 4 
ANS COBOL ■— 


PL/I F 


BFALN= 


11 
ForD 










BUFNO= 


number of buffers 


number of buffers 
(QISAM only) 


number of buffers 
(QISAM only) 


hi 

number of buffers 
(QISAM only) 


number of buffers 
(QISAM only) 


DSORG= 


IS 


IS 


IS 


IS 


IS 


HIARCHY= 


Ll 

Oor 1 










NCP= 


number of channel 
programs 
(BISAM only) 








Li 

number of channel 
programs 
(BISAM only) 


This function can be specified in your program rather than in the DD statement. 

2 This parameter is used only if you are retrieving or updating the data set sequentially. 

This parameter is used only if you are retrieving or updating the data set directly. 
4 

American National Standard COBOL. 



Overwriting an Indexed Sequential Data Set 

You can reuse the space previously allocated to an indexed sequential 
(ISAM) data set and overlay it with a new ISAM data set. The new data 
set will keep the name (dsname) of the overwritten data set. 

In order to overwrite an ISAM data set, you must know the DD 
statement, or statements that were used to create it. You indicate that 
you overwriting the data set by making some changes to the original 
parameters, and recording the remaining parameters without change. 



DATA SET INFORMATION 

The DSNAME and DISP parameters are required. 

DSNAME Parameter 

The DSNAME parameters must be coded just as you coded them in the 
original DD statements. 

DISP Parameter 

The format of the DISP parameter is : 



| DISP =( OLD f, KEEP "I) 

, delete! 



1^ 

L' 1 



Indexed area ; You must specify the same value you specify for the prime 
area. 

Prime area ; If there was only one original DD statement that specified 
a cataloged data set, you can specify 

DISP=(OLD,UNCATLG) or DISP= (OLD, PASS) 

If you do not wish to uncatalog or pass the data set or if there were 
more than one original DD statements specify the DISP parameter as shown 
in the format above. 

Overflow Area ; You must specify the same value you specify for the 
prime area. , 



LOCATION OF THE DATA SET 

The UNIT and VOLUME parameter are required unless the original data set 
was cataloged. 
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UNIT Parameter 

The UNIT parameters must be coded just as you coded them in the original 
DD statements. 
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VOLUME Parameter 

If you made a specific volume request when you created the data set, the 
VOLUME parameters must be coded just as you coded them in the original 
DD statements. 

If you requested nonspecific volumes when you created the data set, 
you must find out the serial numbers and specify them using 
VOLUME=SER= ( serial, . ..). If the data set was cataloged you can use 
VOLUME=REF=dsname. If the data set was defined with only one DD 
statement in a previous step of the same job, you can make a backward 
reference using VOLUME=REF. 

LABEL Parameter 

The LABEL parameter is not needed. Any password protection or retention 
period specified for the original data set will apply to the new data 
set. 



SIZE OF THE DATA SET 

The space allocation specified for the original data set is retained for 
the new data set. If the SPACE parameter is coded, it is ignored. 



DATA ATTRIBUTES 

The DCB parameter must be coded on every DD statement. The DSORG 
subparameter is required; you must specify DSORG=IS or DSORG=ISU. All 
other subparameters you specified for the original data set will be 
carried over for the new data set and you do not have to recode them. 
However, if you want to change the values of one or more of those 
subparameters, you can code the new subparameter in the DCB parameter. 
(You can change all the subparmeters shown in Table 61 except BUFNO. ) 

When more than one DD statement is used to define the data set, code 
all the DCB subparameters on the first DD statement. Code DCB=*.ddname 
on the remaining statement or statements; ddname is the name given to 
the first DD statemnt. 
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Examples 



1. The following example shows a job with two steps. In the first 

step you create an indexed sequential data set with three separate 
areas. All areas reside on the same volume. In the second step 
you retrieve and delete the data set. Note that you cannot make a 
backward reference with the DSNAME parameter because the data set 
was defined with more than one DD statement. 



r ■ 1 

| //SAMP1 JOB 

//ONE EXEC PGM=A 

DD DSNAME= €TOM( INDEX) ,DISP=(, KEEP ),UNIT=2 311, 
VOLUME= ( PRIVATE, SER=ABCD) , SPACE= ( CYL, 2 ) , 
DCB= ( DSORG= IS , RECFM=F) 

DSNAME=S TOM (PRIME) ,DISP= (,KEEP) ,UNIT=2311, 
VOLUME= (PRIVATE, SER=ABCD) ,, SPACE=(CYL, 20 ) , DCB=* . IS 
DSNAME=&TOM(OVFLOW) , DISP= ( ,KEEP) , UNIT=2311, 
VOLUME= ( PRIVATE, S ER=ABCD ) , SPACE= ( CYL , 5 ) , DCB=* . IS 



//IS 

// 

// 

// 

// 

// 

// 



DD 



DD 



//TWO EXEC PGM=B 

//IN DD DSNAME=&TOM,DISP= (OLD .DELETE) , DCB=DSORG=IS, 

// UNIT= 2311, VOL UME=SER=ABCD 

L . J 



The following example shows how to create an indexed sequential 
data set with three separate areas. Each area is on separate 
volumes. The prime area uses two volumes. Note that you must 
request the same number of devices as there are volumes for the 
prime area to use the index area is defined by a separate DD 
statement. The data set is kept. 



//DATA DD DSNAME= JANE ( INDEX), DISP=(, KEEP ),UNIT=2 314, 

// VOLUME=SER=AB0001, SPACE= (CYL, 5) , DCB=DSORG=ISU 

// DD DSNAME= JANE ( PRIME), DISP= (, KEEP ),UNIT= (2413,2), 

// VOLUME=SER=(AB0002,AB0003) ,SPACE= (CYL, 50) , 

// DCB=DSORG=ISU 

// DD DSNAME=JANE(OVFLOW) ,DISP=(,KEEP),UNIT=2314, 

// VOLUME=SER=AB0004, SPACE= (CYL, 10) , DCB=DSORG=ISU 



The following DD statement is used to retrieve the data set. Note 
that the volumes are requested in the same order they were 
specified. Also, the same number of units as there are volumes are 
requested through parallel mounting. DSORG=IS must be coded when 
retrieving the data set. (ISU can only be coded when creating the 
data set . ) 



j //DD4 DD DSNAME=JANE,DISP=OLD,UNIT=(2314,P) | 

| // VOLUME=SER=(AB0001,AB0002,AB0003,AB0004),DCB=DSORG=IS | 

L J 
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The following DD statements must be coded to overwrite the data 
set. Note that the DISP and DCB parameters were changed and that 
the SPACE parameter was omitted. The data set is kept. 



//NEWDS DD DSNAME=JANE (INDEX), DISP=OLD,UNIT=2314, 
// VOLUME=SER=AB0001,DCB=DSORG=ISU 

// DD DSNAME=JANE(PRIME),DISP=0LD,UNIT=(2314,2), 
// VOLUME=SER=(AB0002,AB0003),DCB=*. NEWDS 

// DD DSNAME=JANE (OVFLOW) ,DISP=OLD,UNIT=231U, 
// VOLUME=SER= AB 00 OH , DCB=* . NEWDS 



3. In the following example, an indexed sequential data set without an 
overflow area is defined. The volumes for the index and prime 
areas use different types of devices. 

Nonspecific requests for private volumes are made. The prime area 
requests two volumes. 



//DSET1 DD DSNAME=RAY( INDEX) ,DISP=(, KEEP ),UNIT=2301, 

// VOLUME=PRI VATE , SPACE= ( CYL , 2 ) , 

// DCB= ( DSORG= IS , OPTCD=M, NTM= 50 ) 

// DD DSNAME=RAY (PRIME) , DISP= ( ,KEEP) , UNIT= ( 2311 ,2) , 

// VOLUME= ( PRIVATE, , , 2) , SPACE= ( CYL, 15) , 

// DCB=*.DSETI 



Two DD statements must be used to retrieve the data set because the 
index and prime areas use different types of device. Assume that 
the system assigned volume RFS100 to the index area and RFS101 and 
RFS102 to the prime area. 



//INPUT DD DSNAME=RAY,DISP=OLD,UNIT=2301, 

// VOLUME= (PRIVATE, SER=RFS100) , DCB=DSORG=IS 

// DD DSNAME=RAY,DISP=OLD,UNIT= (2311,2) , 

// VOLUME= (PRIVATE, SER=(RFS101,RFS102) ) , 

// DCB=DSORG=IS 



4. The following example defines an indexed sequential data set with 
an overflow area and an index area embedded in the prime area. The 
overflow and prime areas reside on the same nonspecific volume. 
Note that the VOLUME parameter is not needed in the first DD 
statement because you are requesting a public volume, but it must 
be used in the second DD statement to make sure that both areas are 
assigned to the same volume. 



//EX JOB 

//STEP1 EXEC PGM=X 

//DD1 DD DSNAME=TEMP (PRIME), DISP=(, KEEP) ,UNIT=2311, 

// SPACE=(CYL, (10,, 2)) ,DCB= (DSORG=IS,BUFNO=2) 

// DD DSNAME=TEMP (OVFLOW), DISP=(, KEEP), 

// VOLUME=REF=* . DD1 , SPACE= ( CYL , 3 ) , DCB= * . DDl 



This data set cannot be retrieved in the same job because it is 
defined with more than one DD statement and a nonspecific volume 
request is made. 
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5. The following example defines an indexed sequential data set with 
an overflow area and an index area placed at the end of the prime 
area. The prime area resides on three volumes. Only one device is 
used for the three volumes. You can request fewer devices than 
volumes because there is no separate DD statement for the index 
area and you are not requesting an embedded index area. The data 
set will be cataloged by the IEHPROGM program at a later time. 

r 1 

//J74 DD DSNAME=AB.AC(PRIME),DISP=(,KEEP),UNIT=2314, 

// VOLUME=SER=(78910,78911, 78912,) , SPACE=(CYL,20) , 

// DCB= ( DSORG= IS , RECFM=VB) 

// DD DSNAME=AB.AC(OVFLOW),DISP=(,KEEP),UNIT=2314, 

// VOLUME=SER=7 8913 f SPACE= ( CYL, 5 ) , ,DCB=*.J74 

L J 



The following DD statement is used to retrieve and uncatalog the 
data set. Note that the same number of units and volumes is 
requested and that the volumes are requested in the same order they 
were specified. 

r 1 

j //M32 DD DSNAME=AB.AC,DISP=(0LD,UNCATLG),UNIT=(2314,4) | 

| // VOLUME=SER= (78910, 78911, 78912, 78913), j 

| // DCB=DSORG=IS j 

L J 



6 . The following example defines an indexed sequential , data set with 
no overflow area and an embedded index area. The data set resides 
on a nonspecific public volume. The data set can be cataloged 
because it is defined only on one DD statement. 

r — '■ 

j //ISAM DD DSNAME=MCR,DISP=(,CATLG),UNIT=2302, 

| // SPACE=(CYL, (25, ,5)) 

| // DCB=(DSORG=IS,KEYLEN=10) 

L 



The following DD statement is used to retrieve the data set. The 
UNIT and VOLUME parameters are not needed because the data set is 
cataloged. 

r ., 

j //JAC DD DSNAME=MCR,DISP=OLD,DCB=DSORG-IS j 

L I 

The following DD statement must be coded to overwrite the data set. 
The DISP and DCB parameters were changed. The SPACE parameter was 
omitted. The UNIT and VOLUME parameters are not needed because the 
data set is cataloged. 

i 1 

j //OVER DD DSNAME=MCR,DISP=OLD,DCB=DSORG=IS | 

I J 
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7. The following example defines an indexed sequential data set with 
an overflow area and an embedded index area. The volumes for the 
prime and overflow areas use different types of devices. 



//ABD 

// 

// 

// 

// 

// 



DD 



DD 



DSNAME=JOHN (PRIME) ,DISP= (,KEEP) ,UNIT=2314 

V0LUME=SER=ABD1, SPACE= (CYL, ( 50, , 10) ) , 

DCB= ( DSORG=IS , KEYLEN=5 ) 

DSNAME=JOHN(OVFLOW) , DISP= ( , KEEP) , UNIT=2311, 

VOLUME=SER=7982,SPACE= (CYL, 10) , 

DCB=*.ABD 



Two DD statements must be used to retrieve the data set because the 
prime and overflow areas use different types of device. 



//IN 
// 
// 
// 



DD 



DD 



DSNAME=JOHN, DISP=0LD, UNIT= ( 2314, 2) , 
V0LUME=SER=ABD1 , DCB=DSORG=I S 
DSNAME=JOHN, DlSP=OLD, UNIT=2311, 
VOLUME=SER=7 9 82 , DCB=DSORG=I S 



The following DD statements must be coded to overwrite the data 
set. Note that the DISP and DCB parameters were changed and that 
the SPACE parameter was omitted. The data set is kept. 



//NEWABD DD 

// 

// 

// DD 

// 



DSNAME=JOHN (PRIME) , DISP=OLD, UNIT= ( 2 314 , 2 ) f 

V0LUME=SER=ABD1,DCB= (DSORG=IS, 

KEYLEN=8) 

DSNAME=JOHN (OVFLOW) ,DISP=OLD,UNIT=2311, 

VOLUME=SER= 7982, DCB= * . NEWABD 



Note ; Refer to Example 10 in Part III for additional examples of 
indexed sequential data sets. 
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Appendix B: Glossary of DCB Subparameters 



This glossary lists the keyword subparameters that you can code in the 
DCB parameter on a DD statement, their definitions, and the values that 
can be assigned to them. This glossary must be used with Tables 8, 9, 
10, 13, 14, 15, 17, 18, 19, 20, 21, 22, 61 and 63. These tables show 
which subparameters can be used for your data set. Do not use any 
subparameters or values that do not apply to your data set as shown in 
the Tables . 

There are other DCB subparameters and values of subparameters not 
shown in this glossary. They apply to devices, such as graphics and 
telecommunications, and to access techniques, such as "execute channel 
program" (EXCP), not described in this manual. The complete list of DCB 
subparameters is shown in IBM System/360 Operating System; Job Control 
Language Reference . 

BFALN= 

specifies the boundary alignment of each buffer as follows: 

F 

each buffer starts on a fullword boundary that is not also a 
doubleword boundary. 

D 

each buffer starts on a doubleword boundary. 

If not specified, doubleword boundary alignment (D) is assumed. 

BFTEK= 

specifies the type of buffering to be used by the control program 
as follows : 



simple buffering. 

E 

exchange buffering (track overflow cannot be specified in the 
RECFM subparameter ) . Exchange buffering cannot be used with 
variable — length blocked or spanned records. 

A 

record area buffering. In the locate mode with 
variable-length spanned records, the control program reads and 
writes entire logical records rather than segments. 

R 

record buffering. For writing records in the create BDAM 
mode, this specification allows a logical record to span one 
or more tracks. For reading a data set, segments without keys 
are offset in the buffer by the key length. This means that 
the actual data starts in the same place in the buffer each 
read. 

If the type of buffering is not specified by any source, simple 
buffering (S) is assumed. 
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BLKSIZE= 

specifies the maximum length, in bytes, of a block. The maximum 
length that can be specified is 32,760. For blocks of ASCII 
records on magnetic tape, the maximum length is 2048 and the 
minimum length is 18 . 

• If RECFM=F, then BLKSIZE must be > logical record length. 

• If RECFM=FB, then BLKSIZE must be an integral multiple of the 
logical record length. 

• If RECFM=V, then BLKSIZE must be > (maximum block size *4). 

• If RECFM=VB, then BLKSIZE must be n times (logical record length 
+4) ; where n is the number of logical records in the block. 

• If RECFM=D or DB, then BLKSIZE must be > (maximum record length + 
block prefix length) . 

Note for Indexed Sequential Data Sets (QISAM) ; The block size that is 
specified must be at least 10 bytes less than the number of data bytes 
available on one track of the allocated direct access device. Block 
size information is required only when creating a data set containing 
blocked records. 

Note for SYSOUT data sets with RECFM=FB : If the BLKSIZE subparameter on 
a DD statement for a SYSOUT data set (an output data set being routed 
through the output stream) is not an integral multiple of and larger 
than the logical record length (LRECL) , the block size will be adjusted 
to the nearest lower multiple of the logical record length (LRECL) . 

BUFL= 

specifies the length, in bytes, of each buffer in the buffer pool. 
The maximum length is 32,760 bytes. Requirements for supplying 800 
buffer length information vary with the different data 
organizations and access methods as follows: 

• Direct data sets 

Required only if dynamic buffering is specified in the MACRF 
subparameter of the DCB macro instruction (assembler). 

• Partitioned and sequential data sets 

If omitted and the control program acquires buffers 
automatically, the block size and key length information is 
used to establish buffer length. If card image is specified 
(MODE=C), BUFL=160 must be specified. 

• Indexed sequential data sets 

Not required if the control program acquires buffers 
automatically or if dynamic buffering is specified. (For 
BISAM, dynamic buffering is specified in the MACRF 
subparameter of the DCB macro instruction.) 

BUFNO= 

specifies the number of buffers to be assigned to the data control 
block; the maximum number is 255, but the actual number allowed may 
be less than 255 because of limits established when the system was 
generated. 

BUFOFF= 

specifies the buffer offset. The buffer offset is the length of an 
optional block prefix that may precede a block of one or more ASCII 
records on magnetic tape. 
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n — the length of the block prefix. For input, n may be any 

unsigned decimal number from through 99. For output, n can 
only be 0. 

L — the block prefix field is four bytes long and contains the 

block length. L may be specified only when the record format 
(RECFM) is D. 

CODE= 

specifies the paper tape code in which the data set is punched. 

A ASCII (8 track) . 

B Burroughs (7 track). 

C National Cash Register (8 track). 

F Friden ( 8 track) . 

I IBM BCD perforated tape and transmission code (8 track). 

N No conversion required. 

T Teletype (5 track) . 

If not specified by any source, I is assumed. 

CYLOFL= 

specifies the number of tracks on each cylinder to hold the records 
that overflow from other tracks on that cylinder. The maximum 
number is 99. 

DEN= 

specifies the magnetic tape density in number of bits-per-inch used 
to write a data set, as follows: 

r t t '- T 

I DEN= | 7 track | 9 track | 
|. + + j 

| | 200 | | 

| 1 | 556 | | 

| 2 j 800 | 800 | 

| 3 | | 1600 | 

L JL -L J 

If not specified by any source, 800 bits-per-inch is assumed for 
7- track tape, 800 bits-per-inch for 9 -track tape without dual 
density, and 1600 bits-per-inch for 9- track with dual density. 

For 7-track tape, all information on the reel must be written in 
the same density (i.e., labels, data, tapemarks) . Do not specify 
DEN for a SYSOUT data set. 

DSORG= 

specifies the organization of the data set and whether the data set 
contains any location-dependent information that would make the 
data set unmovable (U) . The values that can be used are as 
follows : 

DA 

Direct access 
DAU 

Direct access unmovable 
IS 

Indexed sequential 
ISU 

Indexed sequential unmovable 
PO 

Partitioned organization 
POU 

Partitioned organization unmovable 
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PS 

Physical sequential 
PSU 

Physical sequential unmovable 



EROPT= 

specifies the option to be executed if an error occurs in writing 
or reading a record, as follows: 

ACC 

accept the block causing the error. 
SKP 

skip the block causing the error (implies RELSE) . 
ABE 

cause abnormal end of task. 

If the subparameter is not specified by any source, ABE is assumed, 

HIARCHY= 

specifies the storage hierarchy in which the buffer pool is to be 
formed as follows : 



forms the pool from available space in processor storage. 
1 

forms the pool from available space in IBM 2361 Core Storage. 

If the HIARCHY subparameter is not specified by any source, 
and if a hierarchy designation is not supplied by the GETPOOL 
macro instruction, hierarchy is assumed. 

The buffer pool is formed in the user partition or region 
within the indicated hierarchy. If space is unavailable 
within the hierarchy specified, the task is abnormally 
terminated. 

LIMCT= 

specifies the number of blocks, if relative block addressing is 
used, or the number of tracks, if relative track addressing is 
used, that are to be searched for a block or available space when 
the extended search option (OPTCD=E) is specified. The number may 
equal or exceed the number of blocks or tracks in the data set, in 
which case the entire data set is searched. 

If the extended search option is not specified, the LIMCT 
subparameter is ignored. 

Note for direct data sets : If standard labels are used, the key 
length information can be supplied from the data set label for an 

existing data set. If a key length is not supplied by any source, 
no input or output requests that require a key may be issued. 

Note for partitioned and sequential data sets : If standard labels 
are used, the key length information can be supplied from the data 
set label for an existing data set. If a key length is not 
supplied by any source before the OPEN macro instruction is issued, 
a length of zero (no keys) is assumed. 

Note for indexed sequential data sets : For an existing data set 
with standard labels, the key length can only be supplied from the 
data set label . 
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LRECL= 

specifies the actual or maximum length, in bytes, of a logical 
record. The record length is required for fixed-length and 
variable length records; for variable-length records, the maximum 
record length should be specified. The length cannot exceed the 
blocksize (BLKSIZE) value except for variable- length spanned 
records . 

• If RECFM=V or VB, then LRECL must be equal to the maximum record 
length + 4. 

• If RECFM=F or FB, then LRECL must be equal to the logical record 
length. 

• If RECFM=U, then LRECL should be omitted. 

• If RECFM=D or DB, then LRECL must be equal to the maximum record 
length +4. 

Note for partitioned data sets : The record length is required for 
fixed-length records only. 

Note for sequential data sets : The record length can be omitted 
from all sources, in which case the block size specification 
(BLKSIZE) is used. For variable- length spanned records (VS or VBS) 
processed under QSAM (locate mode) BSAM, if logical record exceeds 
32,756, specify LRECL=X. 

Note for indexed sequential data sets : For unblocked records, with 
a relative key position (RKP) of zero, the record length includes 
only the data portion of the record. The record length can be 
specified only when creating the data set. 

Note for data sets in ASCII : For blocks of ASCII records on 
magnetic tape, the maximum record length is 2048 bytes; the minimum 
record length is 18 bytes. 

MODE= 

specifies the mode of operation to be used with a card reader, a 

card punch, or a card- read punch, as follows: 

C 

the card image (column binary) mode. 
E 

the EBCDIC mode. 

If this information is not supplied by any source, E is 
assumed. 

specifies the maximum number of READ or WRITE macro instructions 
issued before a CHECK macro instruction is issued. The maximum 
number allowed is 99, based on limits established when the system 
was generated. If chained scheduling is used, NCP must be 
specified as more than 1. 

If not specified by any source, 1 is assumed. 

NTM= 

specifies the number of tracks to be used for a cylinder index. 
When the specified number of tracks has been filled, a master index 
is created. This information is required only when the master 
index option (OPTCD=M) is selected. 

If not specified by any source and OPTCD=M is specified, the master 
index option is ignored. 
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NCP= 



Appendix 



OPTCD= 

specifies the optional services to be performed by the control 
program. All optional services must be requested by the same 
source. The characters may be coded in any order and, when used in 
combination, no commas are permitted between characters. 

A 

actual device address are to be presented ("block address" 
operand) in READ and WRITE macro instructions. For BDAM, P 
requests the same option as A, and either can be coded. 



B 



M 



W 



requests that end- of -file recognition be disregarded for 
tapes . 

requests that chained scheduling is used. 

an extended search (more than one track) is to be performed 
for a block or available space. (The LIMCT subparameter must 
also be specified; otherwise, this option is ignored.) 

feedback may be requested in READ and WRITE macro instructions 
and the device address returned is to be of the form presented 
to the control program. 

requests that the control program use the independent overflow 
areas for overflow records. 

requests that the control program delete records that have a 
first byte of all ones; records so marked may be deleted when 
space is required for new records. Do not specify this option 
for blocked records if RKP=0. 

requests that master indexes be created as required according 
to the information in the NTM subparameter. His option is 
ignored if the subparameter NTM=number if not specified. 

specifies that translation from ASCII input to EBCDIC is 
required or that translation from EBCDIC to ASCII output is 
required. 

for direct data sets actual device addresses are to be 
presented ("block address" operand) in READ and WRITE macro 
instructions. For indexed sequential data sets, requests the 
control program to place reorganization criteria information 
in the R0RG1, RORG2, and RORG3 fields of the data control 
block. This option is provided whenever the OPTCD 
subparameter is omitted from all sources. 

requests user totaling facility. 

only for 1403 printers with the Universal Character Set 
feature: Unblocks data checks and allows analysis by an 
appropriate error analysis (SYNAD) routine. If U is omitted, 
data checks are blocked (not recognized as errors). In the 
case of ISAM, U specifies the full track index write feature. 

requests a validity check for write operations on direct 
access devices. If the device is a 2321 data cell, validity 
checking is always performed, whether requested or not. 

requests that the control program use the cylinder overflow 
areas for overflow records. 
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Only for input on magnetic tape : Requests the control program 
to shorten its normal error recovery procedure . When Z is 
specified, a data check is considered permanent after five 
unsuccessful attempts to read a record. This option is 
available only if selected at system generation. It should be 
used only when a tape is know to be faulty and there is no 
need to process every record. The error analysis (SYNAD) 
routine should keep a count of the number of permanent errors, 
and should terminate processing if the number becomes 
excessive. 

for input from a direct access storage device (DASD) : 
Specifies search direct (SD) for sequential data set. 

PRTSP= 

specifies the line spacing on a printer as 0, 1, 2, or 3 lines 
between printout. This subparameter is valid only if control 
characters are not present (A or M is not specified in the RECFM 
subparameter). If not supplied by any source, 1 is assumed. 

RECFM= 

specifies the format and characteristics of the records in the data 
set. The format and characteristics must be completely described 
by one source. 

If this subparameter is omitted, an undefined-length record is 
assumed with no optional features provided, except for indexed 
sequential data sets where variable -length records are assumed. 
Both the record format and characteristics are specified using the 
characters defined below. The allowable combinations of characters 
are indicated for the associated access methods; the characters 
must be coded in the order shown. 

Character Definitions 

A The record contains ASA control characters . 

B The records are blocked. 

D The ASCII records are of variable length. 

F The records are of fixed length. 

M The records contain machine code control characters . 

S For fixed- length records, the records are written as 

standard blocks, i.e., no truncated blocks or unfilled 
tracks within the data set, with the exception of the 
last block or track. 

For variable-length records, a record may space more 
than one block. Exchange buffering (BFTEK=E) cannot be 
specified. 

T The records may be written onto overflow tracks if 
required. Exchange buffering (BFTEK=E) or chained 
scheduling (OPTCD=C) cannot be used. 

U The records are of undefined length. 

V The records are of variable length. (V-format records 
cannot be in ASCII.) 
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RKP= 

specifies the position of the first byte of the record key, 
relative to the beginning of each record. (The beginning byte of a 
record is addressed as . ) If RKP=0 is specified for blocked 
fixed-length records, the key begins in the first byte of each 
record, and the delete option (OPTCD=L) must not be specified. If 
RKP=0 is specified for unblocked fixed-length records, the key is 
not written in the data field; the delete option can be specified. 

For variable- length records, the relative key position must be 4 or 
greater, when the delete option (OPTCD=L) is not specified. The 
relative key position must be 5 or greater if the delete option is 
specified. If this information is not specified by any source, a 
relative key position of zero is assumed. 

STACK= 

specifies the stacker bin to receive the card, and is either 1 of 
2. If not specified by any source, 1 is assumed. 

TRTCH= 

specifies the recording technique for seven- track tape. 



E 
T 

ET 



Data conversion feature is to be used, with odd parity and no 
translation. 

Even parity, with no translation and no conversion. 

Odd parity and no conversion, and BCD to EBCDIC to BCD 
translation when writing. 

Even parity and no conversion, and BCD to EBCDIC translation 
is required when reading; EBCDIC to BCD translation when 
writing. If this subparameter is not specified by any source, 
odd parity and no translation or data conversion is assumed. 
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Appendix C: Using the Restart Facilities 



When a job step abnormally terminates, you may have to resubmit the job 
for execution. This means lost computer time and a delay in obtaining 
the desired results. To reduce these effects, you can use the restart 
facilities. 

If a job step abnormally terminates or if a system failure occurs the 
restart facilities allow you to request that the job step be restarted 
either at the beginning of the step (step restart) or within the step 
(checkpoint restart) . Furthermore, restart can occur automatically 
after abnormal termination, or it can be deferred until the job is 
resubmitted. 



Note: This appendix is essentially the same as Appendix B of the 
publication IBM System/360 Operating System: Job Control Language 
Reference . It is presented in both publications for the sake of 
completeness . 



Restarts 

For automatic step restart to occur, the RD parameter must request it on 
the JOB statement or on the EXEC statement associated with the step that 
abnormally terminates. (The RD parameter is described in the sections, 
"The Job Statement" and "The EXEC Statement" . Automatic checkpoint 
restart can occur only if a CHKPT macro instruction is executed in the 
processing program prior to abnormal termination. If restart is 
deferred until the job is resubmitted, the RESTART parameter must be 
coded on the JOB statement of the resubmitted job. (The RESTART 
parameter is described in the section "The JOB Statement".) The RESTART 
parameter identifies the step or the step the checkpoint at which 
execution is to be resumed. A deferred restart may be initiated 
regardless of how the resubmitted job was previously terminated 
(normally or abnormally) and regardless of whether an automatic restart 
occurred during the original execution. 

Automatic Step Restart : If an abnormally terminated step is to be 

automatically restarted, the RD parameter must be coded as RD=R or 

RD= RNC. Execution resumes at the beginning of the abnormally terminated 

step. 



Automatic Checkpoint Restart : After an automatic checkpoint restart, 
execution resumes at the instruction immediately following the last 
CHKPT macro instruction that was successfully executed in the abnormally 
terminated step. An automatic checkpoint restart cannot occur if you 
suppress the action of the CHKPT macro instruction; you do this by 
coding RD=NC or RD=RNC. Also, an automatic checkpoint restart cannot 
occur if you code RD=NR; however, RD=NR allows the CHKPT macro 
instruction to establish a checkpoint. 
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Deferred step Restart : To perform a deferred step restart, the RESTART 
parameter must identify the step at which execution is to be resumed. 
Steps preceding the restart step are interpreted but not initiated. 
Since disposition processing occurred during the original execution of 
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the job, you may have to modify control statements associated with the 
restart step before you resubmit the job. Modifications may be required 
in two cases: 

1. A data set was defined as NEW during the original execution. If it 
was created during the original execution, you must change the data 
set's status to OLD, define a new data set, or delete the data set 
before resubmitting the job. 

2. A data set was passed and was to be received by the restart step or 
a step following the restart step. If the passed data set is not 
cataloged, you must supply, in the receiving step, volume serial 
numbers, device type, data set sequence number, and label type. 
(Label type cannot be retrieved from the catalog.) 

To limit the number of modifications required before you resubmit the 
job, you can assign conditional dispositions during the original 
execution. (Data sets assigned a temporary name or no name can only be 
assigned a conditional disposition of DELETE.) If deferred step restart 
will be performed, conditional dispositions should be used: 

• To delete all new data sets created by the restart step. 

• To keep all old data sets used by the restart step, other than those 
passed to the step. (If a nontemporary data set is defined as 
DISP=( OLD, DELETE), it is very important that you assign a 
conditional disposition of KEEP.) 

• To catalog all data sets passed from steps preceding the restart 
step to the restart step or to steps following the restart step. 

Additional changes can be made to your control statements before 
resubmitting the job. For example, you can vary device and volume 
configurations and request step restart on an alternate system with the 
same configuration as used originally. You can also make changes to 
your data. 

Deferred Checkpoint Restart : To perform a deferred checkpoint restart, 
the RESTART parameter must identify the step and the checkpoint at which 
execution is to be resumed. The SYSCHK DD statement, which defines the 
checkpoint data set, must also be included. (The SYSCHK DD statement is 
described in "Special DD Statements" in the section "The DD Statement." 

An internal representation of your statements is kept as control 
information within the system. Some of the control information for the 
restart step or steps following the restart step may have to be modified 
before execution can be resumed at a checkpoint. The following 
modifications for the restart step are automatically made by the system, 
using information contained in the checkpoint entry: 

• The status of data sets used by the step is changed from NEW to OLD. 
(If a new data set was assigned a nonspecific volume and had not 
been opened before the checkpoint was established, this change is 
not made.) 

• If nonspecific volumes were requested for a data set used in the 
restart step, the assigned device type and volume serial numbers are 
made part of the control information. 

• For a multivolume data set, the volume being processed when the 
checkpoint was established is mounted. 
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The only modification that you must make to a control statement is to 
supply certain information about a data set that was being passed by a 
step preceding the restart step to a step, following a restart step. 
You must supply, in the receiving step, volume serial numbers, device 
type, data set sequence number, and label type. You will not have to 
make these modifications if, during the original execution, you assigned 
a conditional dispostion of CATLG to such data sets. If the data is 
cataloged, the system can retrieve this information from the catalog. 
(Label type cannot be retrieved from the catalog.) You should also use 
conditional dispositions to keep all data sets used by the restart step. 
Data sets assigned a temporary name or no name can only be assigned a 
conditional disposition of DELETE. 

Therefore, if you plan a deferred checkpoint restart, you should not 
define your data sets as temporary. (For any nontemporary data set that 
may be deleted, it is very important that you assign a conditional 
disposition of KEEP.) 

Before resubmitting the job for checkpoint restart, you can make 
other modifications to control statements associated with the restart 
step or steps following the restart step. The following items apply to 
the step in which restart is to occur. 

• The DD statements in the restart step can be altered, but the 
statements must have the same names as used originally. You can 
also include additional DD statements. 

• If a data set was open at the time a checkpoint was established and 
restart is to begin at that checkpoint, DD statements in the restart 
step can define the same data set. If there is no need to process a 
data set after restart, you can define the data set by coding the 
DUMMY parameter or DSNAME=NULLFILE on a DD statement provided that: 
(1) the basic sequential access method (BSAM) or the queued 
sequential access method (QSAM) was being used to process the data 
set when the checkpoint was established, (2) the data set is not the 
checkpoint data set that is being used to restart the job step, and 
(3) the job step is not restarted from a checkpoint that is within 
an end-of -volume exit routine for the data set. The name of the DD 
statement must be the same as the one used for the data set during 
the original execution of your program. 

• If DUMMY is not specified the DD statements must define the same 
data sets. Also, the data sets must not have been moved on the 
volume or onto another volume. 

• If a data set was not open when the checkpoint was established and 
is not needed during restart, you can replace the parmaeters used to 
define the data set with the DUMMY parameter. 

• You can alter the data in the restart step. If you omit the data, a 
delimiter statement (/*) is not required, unless the data was 
preceded by a DD DATA statement. 



Modifications you might want to make to control statements following 
the restart step are: varying device and volume configurations, 
altering data, and possibly, requesting checkpoint restart on an 
alternate system with the same configuration as used originally. If the 
parameters PGM, COND, SUBALLOC and VOLUME=REF refer to steps preceding 
the restart step, you must resolve these references before resubmitting 
the job. (A backward reference of VOLUME=SER=( serial number).) 
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Examples of Using the Restart Facilities 

1. The following control statements illustrate the preparations that 
would be made for either an automatic step or checkpoint restart 
before the job is submitted for the first time. 



| //STMRG3 


JOB 


| //STEP1 


EXEC 


| //INPUT 


DD 


| //OUTPUT 


DD 


1 // 




| //W0RK1 


DD 


| //W0RK2 


DD 


j //CHKPT 


DD 


| //STEP2 


EXEC 


j //MERG1 


DD 


| //MERG2 


DD 


1 // 




| //RESULTS 


DD 


1 // 





54321,A.USER,MSGLEVEL=(1,0),RD=R 

PGM=SIMPS0RT 

DSN=SORTIN,VOL=SER=100468,UNIT=2400, 

DISP= (OLD, DELETE) 

DSN=INV (+1) ,UNIT=2311 ,VOL=SER=555334 , 

SPACE=(3200 f (200,100)) , DI SP= ( NEW, CATLG ) 

UNIT=2 4 00,DISP=( NEW, DELETE) 

UNIT=2 4 , DISP= ( NEW, DELETE ) 

UNIT=2 4 00,DISP=( NEW, DELETE) 

PGM=MYMERGE 

DSN=INV (+1) ,DISP=OLD 

DSN=M5,VOL=SER=( 092501, 092502, 092503), 

UNIT=(2400,3),DISP=(OLD,KEEP) 

DSN=M6,UNIT=2400,VOL=SER= (100101, 100102, 

100103) ,DISP=( NEW, KEEP, DELETE) 



Here,, the RD parameter requests step restart for any abnormally 
terminated job step. In STEP1, the DD statement CHKPT defines a 
checkpoint data set. For this step, once a CHKPT macro instruction 
is executed, only automatic checkpoint restart is performed. An 
automatic checkpoint restart cannot occur in STEP2 since a 
checkpoint data set is not defined. 



2. The following control statements illustrate the preparations that 
would be made for either an automatic or deferred step restart 
before the job is submitted for the first time. 



//STMRG3 

//STEP1 

//INPUT 

// 

//OUTPUT 

// 

//WORK1 

//WORK2 

//STEP2 

//MERG1 

//MERG2 

// 

//RESULTS 

// 



JOB 54321,A.USER,MSGLEVEL=(1,0),RD=R 

EXEC PGM=SIMPSORT 

DD DSN=SORTIN,VOL=SER=100468,UNIT=2400, 

DISP= ( OLD, DELETE, KEEP) 

DSN=INV (+1) ,UNIT=2311,VOL=SER=555334, 

SPACE= (3200, (200,100)), DISP=(NEW, CATLG, DELETE) 

UNIT=2400 ,DISP= (NEW,DELETE) 

UNIT=2400,DISP=(NEW,DELETE) 
EXEC PGM=MYMERGE 
DD DSN=INV(+l),DISP=OLD 

DSN=M5,VOL=SER=( 092501, 092502, 092503), 

UNIT=(2400,3),DISP=(OLD,KEEP) 

DSN=M6,UNIT=2400,VOL=SER=( 100101, 100102, 

100103) ,DISP=( NEW, KEEP, DELETE) 



DD 

DD 
DD 



DD 



DD 



L— 



If you are resubmitting this resubmitting this job for step 
restart, you must code the RESTART parameter on the JOB statement 
and identify the step at which execution is to be resumed. If 
execution is to be resumed with STEP2, the MERG1 DD statement must 
be changed to refer to the generation data set by means of its 
present relative generation number, i.e., 

DSN=INV(0) 
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3. The following control statements illustate the preparations that 
would be made for an automatic step or checkpoint restart or a 
deferred checkpoint restart before the job is submitted for the 
first time. 



54321,A.USER,MSGLEVEL= (1,0) ,RD=R 

PGM=SIMPSORT 

DSN=SORTIN,VOL=SER=100468,UNIT=2400, 

DISP= (OLD, DELETE, KEEP) 

DSN=INV (+1) ,UNIT=2311,VOL=SER=555334, 

SPACE=(3200, (200,100) ) ,DISP= (NEW, CATLG, KEEP) 

DSN=A,UNIT=2400,DISP= (NEW, DELETE, CATLG) 

DSN=B,UNIT=2400,DISP= (NEW, DELETE, CATLG) 

DSN=C,UNIT=2400, DISP= (NEW, DELETE, CATLG) 

PGM=MYMERGE 

DSN=INV (+1) , DISP=OLD 

DSN=M5, VOL=SER= (092501, 092502, 092503) , 

UNIT= (2400,3), DISP= (OLD, KEEP) 

DSN=M6,UNIT=2400,VOL=SER= (100101,100102, 

100103) ,DISP=( NEW, KEEP) 



| //STMRG3 


JOB 


| //STEP1 


EXEC 


| //INPUT 


DD 


1 // 




| //OUTPUT 


DD 


1 // 




| //WORK1 


DD 


| //WORK2 


DD 


| //CHKPT 


DD 


| //STEP 2 


EXEC 


| //MERG1 


DD 


| //MERG2 


DD 


1 // 




| //RESULTS 


DD 


1 // 





L_. 



Either an automatic automatic checkpoint restart or a deferred 
checkpoint restart can occur in STEP1 if the step abnormally 
terminates. To perform a deferred checkpoint restart, the RESTART 
parameter must be coded on the JOB statement and a SYSCHK DD 
statement must be included before resubmitting the job. Only 
automatic step restart can occur in STEP2. The data sets that 
would normally be defined as temporary data sets so conditional 
dispositions can be assigned to them. 
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Appendix D: Summary of the DD Statement 



This appendix summarizes the DD statement parameters required to perform 
the following functions: 



• Create a data set on an unit record device 
(card punch or printer)) 

• Create a data set on a system output device 

• Create a data set on magnetic tape 

• Create a data set on a direct access device 



Table 64 
Table 65 
Table 66 
Table 67 



• Retrieve a data set from an unit record device 

(card reader or paper tape reader) Table 68 

• Retrieve a data set from the input stream Table 69 

• Retrieve a passed data set (magnetic tape or direct access) Table 70 

• Retrieve a cataloged data set 

(magnetic tape or direct access) Table 71 

• Retrieve a kept data set (magnetic tape or direct access) Table 72 

• Extend a passed data set (magnetic tape or direct access) Table 73 

• Extend a cataloged data set 

(magnetic tape or direct access) Table 74 

• Extend a kept data set (magnetic tape or direct access) Table 75 

• Postpone definition of a data set Table 76 

For further convenience in using the above Tables, you should also 
use the fold-out Tables in the section "The DD Statement''. Table 6 
should be used with Tables 64-67; Table 16, with Tables 68-72; and Table 
23, with Tables 73-75. 

The ddname is not shown in the Tables of this Appendix. You should 
write the ddname as explained in "Naming the DD Statement" in the 
section "The DD Statement". 

Indexed sequential data sets are described in Appendix A. 
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Table 64. Creating a Data Set on an Unit Record Device (Card Punch or Printer) 

Format 



T T - 

Parameter | Parameter | 
Type | | 
h 



Location of |UNIT 
the Data Set | 



Data | DCB 
Attributes | 



-+ 



/'unit address > 
1052 
1403 
1442 
|UNIT=(l443 
2520 
2540-2 
3211 
jroup name 



DCB=(list of attributes) 



DCB=( 



£ 



ddname 

stepname . ddname 

stepname. procstepname. ddname 



jl.li 



list of attributes]) 



I Notes: See Tables 8 and 9 for attributes 



| UCS I [~UCS= (code [*,F0LDl [ , VERIFY] )~| 

I |L L- J J 



Special 

Processing 

Options 



I 

|FCB 



h 



| [fcb=( image-id [", ALIGN "])"] 
| |_ [.VERIFY J J 

DUMMY | [DUMMY] 

I 

1 Note ; Positional parameter 
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Table 65. Creating a Data Set on a System Output Device 



Parameter 

Type 
i 

Location of 
the Data Set 



Parameter 



Format 



I 

UNIT 



SYSOUT 



SYSOUT= (classname [~, program"! [ , form number] ) 

Note: "Classname" is a letter (A-Z) or a number (0-9) 



See Table 67. 



Size of the 
Data Set 



SPACE 



See Table 67. 



Data 
Attributes 



DCB 



See Tables 8, 9, and 13, 



Special 

Processing 

Option 



OUTLIM 



OUTLIM=number 

Note ; For systems with MFT or MVT that have the System 



Management Facilities option. 
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Table 66. Creating a Data Set on a Magnetic Tape (Part 1 of 2) 
r- 



T T 

Parameter 



Parameter 

Type 
j 

Data set 
Information 



Format 



DSNAME 

and 
DISP 



Temporary - for the duration of the job : 



DSNAME= fegname) ,DISP=( NEW, PASS , DELETE ) 
(Sname f 

Temporary - for duration of the job step : 



DSNAME= f&Sname) ,DISP= (NEW. DELETE, DELETE) 
(Sname / 

Nontemporary - cataloged : 

DSNAME=dsname , DISP= ( NEW , CATLG f , CATLG "1 ) 



JfjCATLG T 

, DELETE 
\j KEEP J 



Nontemporary - kept : 

DSNAME=dsname, DISP= (NEW, KEEP [. KEEP "] ) 



[ ,KEEP "J 
, DELETE 
, CATLG J 



Nontemporary - member generation data group 
DSNAME=groupname (+number) , PI SP = ( NEW , CATLG 



E , CATLG 1) 
, delete! 



Location of 
the Data Set 



UNIT 



-+ 



unit address 
2400 
2400-1 
UNIT=(< 2400-2 
2400-3 
2400-4 
group name 






unitcount 



[ , DEFER] ) 



VOLUME 



Nonspecific request - one scratch volume (temporary data set) : 

Omit 

Nonspecific request - more than one scratch volumes 
(temporary data set) : 



VOLUME= ( , , , vol count) 

Nonspecific request - private volume (temporary data set) : 



VOLUME= ( PR IVATE [ , , , vole ount ] ) 

Nonspecific request - private volume (nontemporary data set) : 



VOLUME= ( |"PRI VATE, RETAI N"| [ , , volcount ] ) 

Specific request - private volume (request by serial number) : 



VOLUME= ( ["PRIVATE, RETAIN"! [", ,volcount,TSER= (serial, . ...)) 
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Table 66. Creating a Data Set on a Magnetic Tape (Part 2 of 2) 

r t- 

Parameter 

Type 



Parameter 



Format 



Location of 
the Date Set 
(cont. ) 



VOLUME 
(cont.) 



Specific request - private volumes used by other data set) 



VOLUME= ( [PRIVATE, RETAIN] [~, , vol count,"] 



dsname 

REF= |*. ddname | 

1 * . stepname . ddname i 

1 *. stepname. procstepname. ddname) 



LABEL 



LABELf ( [sequence] 



H 



,.SL 

,SUL 

,NSL 

,NL 

,BLP 



[", PASSWORD*] [, IN "It,] rEXPDT=yyddd"| ) 
L J LOUT J |_RETPD=nnnn J 



Data 
Attributes 



DCB 



DCB=(list of attributes) 

ddname 
DCB= ( { * . stepname . ddname 






£,list of attributes]) 



stepname. procstepname. ddname J 
Note: see Table 10 for attributes 



Special 

Processing 

Options 



SEP or 
AFF 

I 

DUMMY 



[SEP= (ddname, . . . )"] 
AFF=ddname J 



I DUMMY] 

Note s Positional parameter 
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Table 67. Creating a Data Set on Direct Access Devices (Part 1 of 3) 



Parameter 
Type 



Parameter 



~+ 



Format 



Data Set 
Information 



DSNAME 

and 
DISP 



Temporary - for the duration of the job : 



S Sname 
DSNAME= ) Sname [ , DI SP= (NEW , PAS S, DELETE ) ) 

SSname(membername) 
Sname (membername ) 

Temporary - for the duration of the job step : 

S 6 name 
DSNAME= J Sname [ ,DISP=( NEW, DELETE, DELETE ) 

S Sname (member name)( 
Sname (membername ) 

Nontemporary - cataloged t 



ids name ) 

dsname (membername )>,DISP= (NEW, CATLG I ", CATLG " 
d sname (membername ) ) , DELETE 

[/KEEP 
Nontemporary - kept ; 



DSNAME= (dsname 

\ dsname (membername) 



V , DI SP = ( NEW , KEEP f , KEEP "] ) 



[ ,KEEP 1 
, DELETE 
, CATLG J 



Nontemporary - member generation data group : 
DSNAME=groupname ( +number ) w DISP= ( NEW , CATLG 



~+ 



[ ", CATLG "1 ) 

[, delete! 



Location of 
the Data Set 



UNIT 



UNIT=( 



*,, unit count] 



[ , SEP= (ddname, ...)]) 



Note: 



unit address^ 
2301 
2302 
2302 
2303 
2305-1 
2305-2 
2311 
2314 
2319 
2321 
3330 

^group name 

To indicate the 2319, specify UNIT=2314. To designate 
the 2319 as the particular device for your data set, 
specify UNIT=unit address. 



VOLUME 



Nonspecific request - one public volume : 
Omit 

Nonspecific request - more than one public volumes : 
VOLUME= ( , , , volcount) 

Nonspecific request - private volume : 
VOLUME= (PRIVATE I", RETAIN"! [ , ,VOlcount] ) 

Specific request - public volume (request by serial number) : 
VOLUME= ( [ , , , volcount , ] SER= (serial ,...)) 
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Table 67. Creating a Data Set on Direct Access Devices (Part 2 of 3) 

(Parameter | Parameter | Format 

I Type | | 



H 



--+- 



Location of 
the Data set 
(cont. ) 



VOLUME 
(cont.) 



-f 



LABEL 



Specific request - public volume (volumes used by other 



data set) : 



dsname 
VOLUME= ( t , , , vol count , ] REF= ] * . ddname 

* . stepname . ddname 

* . stepname . pr oc stepname . ddname I 

Specific request - private volume (request by serial number) : 



VOLUME= (PRIVATE]", RETAIN*] I , , vol count, 3SER= (serial, . . . ) ) 
Specific request - private volume (volumes used by other 



data set) : 



VOLUME= ( PRIVATE 



I", RETAIN"! [,, 



vol count, ] 



j dsname 
REF= ) * . ddname 

I * . stepname . ddname 
* . stepname . procstepname . ddname 



LABEL=( 



[.' SUL , PASSWORD , IN [ , ] [EXPDT=yy ddd"| ) 1 
, J \_, J L» 0U TJ LRETPD=nnnn J J 



Size of 

the Data Set 

(choose one) 



SPACE 



The system assigns tracks : 



J 



{TRK 
CYL \ , (primary quantity T, secondary quantity"] 
block length) |_, J 

r,CONTIG~ 
[ , directory] )rRLSE~| 



, MXIG 
,ALX 



[ , ROUND] ) 



Requesting specific tracks : 



SPACE= (ABSTR, (primary quantity , address [ , directory] ) ) 



SPLIT 



~+ 



Units of cylinders : 



• First data set 

SPLIT=(n, CYL, (primary quantity [, secondary quantity])) 

• Subsequent data sets 
SPLIT=n 

Units of blocks: 



• First data set 
SP LIT=(%,blockl en gth, (primary quantity [,se con da ry quantity])) 

• Subsequent data sets 
SPLIT=% 
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Table 67. Creating a Data Set on Direct Access Devices (Part 3 of 3) 



T 



Parameter 
Type 



Parameter 



Format 



--h 



Size of 
the Data Set 
choose one) 
(cont.) 



SUBALLOC 



I 

Data 
Attributes 



Reserved area: 






{TRK 
CYL S, (primary quantity) ,.,C0NTIG) 
blocklength) 



Suballocaed data sets: 



(TRK 
SUBALLOC=(<CYL 



(block length) 



>,( primary quantity f, secondary quantity] 



{ 



[: 



J 

ddname \ 

[, directory] ){ , stepname . ddname >) 

stepname . procstepname . ddname) 



DCB 



DCB=(list of attributes) 

dsname 
DCB=( ]* .ddname 

* . stepname. ddname 

♦stepname. procstepname . ddname 



[„list of attributes]) 



Note: See Tables 13, 14, and 15 for attributes 



~+ 



Special 

Processing 

Options 



SEP or 
AFF 



DUMMY 



~+ 



[SEP =( ddname 
AFF=ddname 



,..•>] 



[DUMMY] 
Note : Positional parameter 



DYNAM 



[ DYNAM] 

Note : Positional parameter 
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Table 68. Retrieving an Existing Data Set From an Unit Record Device (Card Reader or 
Paper Tape Reader) 



Parameter 
Type 



Parameter 



~+ 



Format 



Location of 
the Data Set 



UNIT 



Data 
Attributes 



DCB 



~+ 



unit address] 
1442 
UNIT=)2520 
2540 
2671 
group name 



DCB=(list of attributes) 






ddname 
DCB= ( {* .ddname . stepname > [ , list of attributes ] ) 

ddname . procst epname . ddname 



.)■• 



--+ 



Note: See Tables 17 and 18 for attributes 



Special 

Processing 

Option 



DUMMY 



[DUMMY] 

Note ; Positional parameter 
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Table 69. Retrieving a Data Set From the Input Stream 

r T" r ' 

| Parameter | Parameter | Format 

I Type | | 

j. + }.. 



j Location of | * or | f* \ 
jthe Data Set |DATA |(DATAJ 
j. + y 

JData JDCB | [DCB=( [BLKSIZE=number of bytes] [,] [BUFNO=number of buffers])] 
j Attributes | | 
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Table 70. Retrieving a Passed Data Set (Magnetic Tape or Direct Access) 
I Parameter j Format 



Parameter 
Type 



—h 



Data Set 
Information 



I 

DISP 



DSNAME 



Retrieving by name : 



dsname 

,ds name ( membername ) 
DSNAME= j&Sname 

SSname (membername) | 

Sname 

&name (membername) 

Making backward reference ; 



DSNAME 



>!••: 



ddname 

stepname. ddname 

stepname . proc stepname. ddname , 



Passing the data set to a subsequent step : 



DISP= ( OLD, PASS f, DELETE - ] ) 
, CATLG 
|_ f KEEP J 

Last time a passed temporary data set is used in lob : 



DISP= (OLD, DELETE, DELETE ) 

Last time a passed nontemporary data set is used in job : 



DISP=(OLD 



', KEEP 
, DELETE 
, CATLG 



.KEEP * 
, DELETE 
, CATLG 



Location of 
the Data Set 



UNIT 



[UNIT=(,unitcount) ] 



LABEL 



LABEL= 



(,SUL 
,NL 
,NSL 

,BLP 



Data 
Attributes 



DCB 



"DCB=(list of attributes) 



(*., 

$=<*.: 

(*.! 



ddname 
DCB= \ * . stepname . ddname 

stepname. procstepname. ddname 



} 



Note : See Tables 19, 20, 21, and 22 for attributes 



Special 

Processing 

Option 



DUMMY 



[DUMMY] 
Note : Positional parameter 
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Table 71. Retrieving a Cataloged Data Set (Magnetic Tape or Direct Access) 



Parameter 
Type 



-T— T 

| Parameter 
I 



Format 



Data Set |DSNAME 
Information J 



!ds name \ 

dsname (membername)l 
groupname( number) I 



DISP 



DISP= 



= ( / OLD ) f , UNCATLG - ] |~, UNCATLg"! ) 
\SHRj , DELETE I, DELETE J 



Location of jUNIT 
the Data set | 



Recpiestinq units : 



UNIT= ( , [unit count] I, DEFER] ) 

L p J 

Unit affinity : 



[ UNIT=AFF= ddname] 



VOLUME 



VOLUME= ( £ PRIVATE I", RETAIN] [ , sequence] ) 



LABEL 



I,SUL 
,NL 
,NSL 
,BLP 



Data 
Attributes 



DCB 



DCB=(list of attributes) 



DCB=( 



dsname . 

* . ddname / 

*.stepname f ddname j [,11st of attributes]) 

* . s tepname. procstepname . ddname ) 



Note ; See Tables 19, 20, 21, and 22 for attributes 



Special 

Processing 

Options 



SEP or 
IAFF 



DUMMY 



SEP =( ddname, 
AFF=ddname 



...)"] 



[DUMMY] 
Note : Positional parameter 
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Table 72. Retrieving a Kept Data Set (Magnetic Tape or Direct Access) 



] Parameter 
I Type 



Parameter 



~+ 



Format 



Data Set 
Information 



Location of 
the Data Set 



I 

Data 
Attributes 



I 

VOLUME 



DSNAME 



DISP 



-H- 



DSNAME=|dsname \ 

(dsname(membername)/ 



DISP=(/OLD) 
\SHRJ 



UNIT 



~+ 



.KEEP " 
,CATLG 
, DELETE 



, KEEP " 
,, CATLG 
, DELETE 



Requesting units ; 



{unit address} r , unitcounfj 
device type > ,P [, DEFER]) 

group name )|_* J 

Unit affinity : 



UNIT=AFF=ddname 



VOLUME= ( [PRIVATE] 



I", RETAIN] SER=( 



= ( serial., .. .)) 



LABEL 



LABEL= ( [sequence*] 



,SUL 

,NL 

,NSL 

L#BLPJ 



H 



i 

Special 

Processing 

Options 



DCB 



DCB= ( list of att r ibut es ) 

Idsname , 

* .ddname 
* . s t epname . ddname 
* . stepname. procstepname. ddname] 



[,list of attributes]) 



Note : See Tables 19, 20, 21, and 22 for attributes 



SEP or 
AFF 
1 — 

DUMMY 



~+ 



[SEP- (ddname, . . . ) 1 
AFF=ddname J 



[DUMMY] 

Note : positional parameter 
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Table 73. Extending a Passed Data Set (Magnetic Tape or Direct Access) 



Parameter 
Type 



Parameter 



~+ 



Format 



Data set 
Information 



DSNAME 



Retrieving by name ; 



dsname 

d sname ( member name ) 1 
DSNAME = J S S name 

& Sname (membername)( 

Sname 

Sname (member name) 

Making a backward reference : 



DSNAME^ 



■{;; 



ddname ] 

s tepname . ddname 

stepname. procstepname. ddname J 



DISP 



Passing the data set to a subsequent step : 



DISP= ( MOD , PASS |~, DELETE"] ) 
,CATALG 
|_, KEEP J 

last time a passed temporary data set is used in job : 



DISP= (MO D, DELETE. DELETE ) 

last time a passed nontemporary data set is used in job : 



DISP=(MOD 



1 

Location of 

the Data Set 



'.KEEP " 
, DELETE 
, CATLG 



.KEEP "1 
, DELETE ) 
, CATLG J 



H 



UNIT 



[uNIT= 



( r,unitcount"| [, 



DEFER] | 



VOLUME 



(VOLUME= ( , , , vol count) ] 



LABEL 



I f SUL 
#NL 
,NSL 
,BLP 



H 



Size of the 
Data Set 



SPACE 



\ 

Data 
Attributes 



[(TRK 
SPACE=( jCYX [(1, secondary quantity) /RLSE)] 

(block length 



+-.- 



DCB 



DCB=(list of attributes) 



* .ddname \ 

DCB=^*. stepname. ddname (l,list of attributes] 

*. stepname. procstepname. ddname ) 

Note : See Tables 19, 20, and 22 for attributes 



I 

Special 

Processing 

Option 



DUMMY 



[DUMMY] 

Note : Positional parameter 
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Table 74. Extending a Cataloged Data Set (Magnetic Tape or Direct Access) 



Parameter 
Type 



Parameter 



Format 



Data set 
Information 



DSNAME 



I 

DISP 



~+ 



I 

I Location of 
the Data Set 



~+ 



ids name ) 

DSNAME=(dsname (membername)J 



DISP=(MOD 



", UNCATLG 
„ DELETE 
, CATLG 



", UNCATLG"] 
, DELETE ) 
, CATLG J 



UNIT 



Requesting units : 



I 

Size of the 
Data set 



[UNIT= C , [unitcount] [, DEFER] )"] 
L p J J 



Unit affinity ; 



[UNIT=AFF=ddname ] 



VOLUME 



VOLUME= ( [PRIVATE [", RETAIN] I", sequence*"] t , volcount] ) 



LABEL 



I,SUL\ " 
#NL () 
,NSL 
,BLP' J 



SPACE 



[(TRK 
SPACE=(<CYL |,(1, secondary quantity) 

(block length 



,RLSE) 



Data 
Attributes 



DCB 



DCB=(list of attributes) 



dsname 
DCB=( 1* .ddname 

* . stepname. ddname 

* . stepname. proc stepname. ddname j 



[,list of attributes]) 



Note ; See Tables 19 20, and 22 for attributes 



Special 

Processing 

Options 



SEP or 
AFF 



SEP= (ddname, 
AFF=ddname 



DUMMY 



~+ 



... 



[DUMMY] 

Note ; Positional parameter 
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Table 75. Extending a Kept Data Set (Magnetic Tape or Direct Access) 



Parameter 
Type 



Parameter 



Format 



Data Set 
Information 



DSNAME 



DISP 



~+ 



DSNAME=fdsname ) 

\dsname (membername)f 



DISP=(MOD 



'.KEEP " 
, CATLG 
, DELETE 



'.KEEP 1 
, CATLG ) 
,DELETEJ 



Location of 
the Data Set 



UNIT 



Requesting units ; 



iunit address ) r, unitcount"] 
device type | , P [ , DEFER] ) 
group name >[_, J 

Unit affinity : 



UNIT=AFF=ddname 



VOLUME 



LABEL 



~+ 



VOLUME= ( PR IVATEl", RETAIN^, ,volcount , ] SER= ( serial ,...)) 



LABEL= ( [sequence*] 



,SUL 
,NL 
,NSL 
_,BLPJ 



| 

Size of the 
Data Set 



~+ 



SPACE 



-+r 



r (TRK J I 

SPACE=(<CYL XI, secondary quantity) , RLSE) 

L (block length) J 



Data 
Attributes 



h 



DCB 



DCB=(list of attributes) 



dsname 
DCB=( )* .ddname 

* . stepname. ddname 

* . s tepname . pr oc s te pname . ddname I 



[,list of attributes]) 



Note ; see Tables 19, 20, and 22 for attributes 



~+ 



Special 

Processing 

Options 



SEP or 
AFF 



[SEP= (ddname, . . . )"J 
AFF=ddname J 



DUMMY 



[DUMMY] 

Note ; Positional parameter 
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Table 76. Postponing Definition of a Data Set 



j Parameter 
I Type 
h 



| Parameter 
I 



Format 



| Special | DDNAME 
| Processing | 
| Option j 



DDNAME=ddname 



| Data | DCB 
| Attributes | 

I A 



[DCB=((BLKSIZE=number of bytes] [„ ] [BUFNO=n umber of buffers)] 
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* parameter : This parameter is coded as 
the first parameter on a DD statement that 
precedes data in the input stream. 

ACCT parameter : This parameter is used to 
supply accounting information for a job 
step to an installation accounting routine 
and is coded on an EXEC statement. 

AFF parameter : This parameter is used to 
request the same channel separation from 
certain data sets as was requested earlier 
in the job step. The AFF parameter is 
coded on a DD statement. 

alias : An alternate name that may be used 
to refer to a member of a partitioned data 
set. 

allocation : The process of assigning a 
resource to a job step. 

automatic restart : A restart of a job 
after a job step abnormally terminates. 
The restart takes place during the current 
run, that is, without resubmitting the job. 

automatic volume recognition (AVR) : A 
feature that allows the operator to mount 
labeled volumes on available input/output 
devices before those volumes are required 
by a job step. 

auxiliary storage : Data storage other than 
main storage; secondary storage. 

background job : A job that is entered 
through a time sharing terminal by means of 
the TSO SUBMIT command or through the input 
stream (SYSIN) . 



DISP=( status, CATLG) on the DD 
statement that defines the data set 
you want cataloged. A cataloged data 
set is easy to retrieve. 

cataloged data set : A data set that is 
represented in an index or hierarchy of 
indexes in the system catalog, the indexes 
provide the means for locating the data 
set. 

cataloged procedure : A set of JCL 
statements that has been assigned a name 
and placed in a partitioned data set known 
as the procedure library. To use a 
cataloged procedure, code the procedure 
name on an EXEC statement. 

checkpoint/restart : A facility of the 
operating system that can minimize time 
lost in reprocessing a job step that 
abnormally terminated. The CHKPT macro 
instruction, the RESTART parameter on the 
JOB statement, and the RD parameter on the 
JOB or EXEC statement are associated with 
this facility. 

checkpoint restart : A restart within a job 
step. The restart may be automatic 
(depending on an eligible completion code 
and the operator's consent) or deferred, 
where deferred involves resubmitting the 
job and coding the RESTART parameter on the 
JOB statement of the resubmitted job. 

CLASS parameter : This parameter is used to 
assign a job class to your statement and is 
coded on a JOB statement. In 
multiprogramming systems, jobs within a job 
class are initiated according to their 
priority numbers. 



backward reference : A facility of the job command statement : A JCL statement that is 



control language that permits you to copy 
information or refer to DD statements that 
appear earlier in the job. 

block prefix : An optional field that may 
precede the first or only record in a 
block. For D- format records, the block 
prefix can contain the actual block length. 



catalog : 

1. The collection of all data set indexes 
maintained by data management. Each 
entry contains a data set name and 
volume and unit information about the 
data set. 

2. To place an entry for a data set in 
the catalog. To specify this on a 
control statement, code 



used to issue commands to the system 
through the input stream. 

comment statement : A JCL statement used to 
contain information that may be helpful to 
yourself or another person that may be 
running your job or reviewing your output 
listing. 

concatenated data sets : A group of input 
data sets that are treated as one data set 
for the duration of a job step. 

COND parameter : This parameter is used to 
test return codes issued by the processing 
programs; any test that is satisfied causes 
the job to be terminated or a job step to 
be bypassed. The COND parameter is coded 
on a JOB or EXEC statement. 
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control volume ; A volume that contains one 
or more indexes of the catalog. 

data control block (DCB) ; A control block 
used to contain certain attributes required 
by an access method to store or retrieve a 
data set. The DCB parameter is one means 
of supplying attributes. 

DATA parameter : This parameter is coded as 
the first parameter on a DD statement that 
precedes data in the input stream when the 
data contains job control statements. 

data set : An organized collection of 
related data in one of several prescribed 
arrangements. The information required to 
store and retrieve this data is defined on 
a DD statement. 

data set control block : A data set label 
for a data set on a direct access volume. 

data set label : A collection of 
information that describes the attributes 
of a data set. The data set label for a 
data set is normally on the same volume as 
the data set it describes. 

DCB : See data control block. 

DD statement (data definition) : A JCL 
statement that defines a data set that is 
being created or retrieved in ajob step. 
DD statements follow an EXEC statement. 



D format : A data set format in which ASCII 
records are variable lengths. 



direct access device : An auxiliary storage 
device in which the access time is 
effectively independent of the location of 
the data set. 



direct data set : A data set whose records 
are in random order on a direct access 
volume. Each record is stored or retrieved 
according to its actual address or its 
address relative to the beginning of the 
data set. 

directory : A series of 256-byte records at 
the beginning of a partitioned data set 
that contains an entry for each member in 
the data set. 

DISP parameter : This parameter is used to 
describe the status of the data set and 
indicates what should be done with the data 
set after termination of the job step that 
processes it, or at the end of the job. 
The DISP parameter is coded on a DD 
statement. 

dispatching priority : The number assigned 
to a task, which in a multitask 
environment, determines the order in which 
the tasks may use main storage and CPU 
resources. 



ddname (data definition name) : A name 
assigned to a DD statement. This name 
corresponds to the ddname appearing in a 
data control block. 

DCB parameter : This parameter is used to 
supply attributes about the data set that 
are needed to complete the data control 
block. The DCB parameter is coded on a DD 
statement. 

DDNAME aprameter : This parameter is used 

to postpone the definition of a data set 

until later in the same job step and is 
coded on a DD statement. 

deferred restart : A restart that is 
performed when a job is resubmitted and the 
RESTART parameter is coded on the JOB 
statement of the resubmitted job. 

delimiter statement : A JCL statement used 
to mark the end of data. The characters /* 
appear in columns 1 and 2 of this JCL 
statement . 

device type : A number that corresponds to 
a type of input/output device. Coding the 
device type in the UNIT parameter of the DD 
statement is one-way of indicating what 
input /output device you want allocated to a 
job step. 



DPRTY parameter : This parameter is used to 
assign a dispatching priority to a job step 
and is coded on an EXEC statement. 

DSN parameter : This parameter is used to 
assign a name to a new data set or to 
identify an existing data set and is coded 
on a DD statement. Coding DSN is the same 
as coding DSNAME. 

DSNAME parameter : This parameter is used 
to assign a name to a new data set or to 
identify an existing data set and is coded 
on a DD statement. Coding DSNAME is the 
same as coding DSN. 

DUMMY parameter : This parameter is used to 
tell the system that the processing program 
should be executed, but no input or output 
operations should be performed on a 
particular data set. The DUMMY parameter 
is coded as the first parameter on a DD 
statement. 

DYNAM parameter : For TSO,, this parameter 
is used to specify that dynamic allocation 
of data sets is to be used. This allows 
you to defer definition of a data set until 
you require it. If DYNAM is used in the 
background (batch environment) , it means 
the same as DUMMY. The DYNAM parameter is 
coded on a DD statement. 
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dynamic storage ; That portion of main 
storage that is subdivided into partitions 
or regions for use by the programs 
associated with job steps and some system 
tasks. 

Exclusive control : This means that only 
one job at a time can process a data set. 
A request for an exclusively controlled 
data set will not be processed until the 
job with control terminates. Also a 
request for the data set name itself will 
not be processed — even though the name 
may not refer to the same physical data 
set. 

EXEC (execute) statement : A JCL statement 
that marks the beginning of a job step and 
identifies the program to be executed or 
the cataloged procedure to be used. 

extent : A contiguous area of storage on a 
direct access volume in which a data set 
resides. A data set may reside in more 
than one area of storage on one or more 
volumes . 

F format : A data set format in which the 
logical records are the same length. 

FCB parameter : This parameter is used to 
specify the forms control image you want to 
use to print an output data set on a 3211 
printer. The FCB parameter is coded on a 
DD statement. 

fixed- length record : A record having the 
same length as all other records with which 
it is logically or physically associated. 

foreground : The environment in which 
programs invoked by commands are performed. 
Programs are swapped in and out of main 
storage as necessary to efficiently utilize 
main storage. 

foreground job : Any job executing in a 
foreground region,, such as a command 
processor or a terminal user's program. 
Also called a "terminal job." 



generation data group : A collection of 
data sets that are kept in chronological 
order; each data set is called a 
generation. The DSNAME parameter is used 
to define the generation you are creating 
or retrieving. 

generation data set : One generation of a 
generation data group. 

group name : A 1- to 8-character name that 
identifies a device or a collection of 
devices. Coding a group name in the UNIT 
parameter is one way of indicating what 
type of input/output device you want 
allocated to a job step. 



index : 

1. A table in the catalog used to locate 
data sets. 

2. A table used to locate the records of 
an indexed sequential data set. 



indexed sequential data set : A data set on 
a direct access volume whose records 
contain a key portion and the location of 
each record depends on the contents of the 
key portion. The location of each record 
is computed through the use of an index. 



initiation : The process of selecting a 
step for execution and allocating 
input/output devices for the job step. 



job 



input job queue : A queue of summary 
information of JCL statements maintained by 
the job scheduler, from which it selects 
the jobs and job steps to be processed. 

input stream : The sequence of JCL 
statements and data submitted to the 
operating system on an input device 
especially activated for this purpose by 
the operator. 

in- stream procedure : A set of JCL 
statements in the form of cards that have 
been placed in the input stream of a card 
reader. An in- stream procedure can be 
executed any number of times during the job 
in which it appears. 



JCL : A high-level programming language 
used to code JCL statements which describes 
a job to the operating system and inform 
the system of how the job is to be 
processed. 

JCL Statement : Any one of the control 
statements in the input stream that 
identifies a job or defines its 
requirements. 

job: A total processing application that 
consists of one or more processing programs 
required to perform the application. A job 
is identified by a JOB statement. 

JOB statement : A JCL statement that marks 
the beginning of a job,, and when jobs are 
stacked in the input stream, marks the end 
of the JCL statements for the preceding 
job . 

job class : An alphabetic character of A 
through that characterizes the type of 
job you are submitting. Each job class is 
defined by the installation; you indicate 
the type of job you are submitting in the 
CLASS parameter on the JOB statement. In 
multiprogramming systems, jobs within a job' 
class are initiated according to their 
priority numbers. 
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job control language : See JCL. 

job control statement. : see JCL statement. 

job library : See private library. 



job management : A general term that 
collectively describes the functions of the 
job scheduler and master scheduler. 



job processing : The reading of JCL 
statements and data from an input stream, 
the initiating of job steps defined in 
these statements,, and the writing of system 
output messages. 



job scheduler : A control program function 
that controls input streams and system 
output, obtains input/output devices for 
jobs and job steps , and regulates the use 
of the computing system by jobs. The job 
scheduler is made up of the 
reader /interpreter,, initiator/terminator, 
and output writer. 



job step : The unit of work associated with 
one processing program or one cataloged 
procedure, and related data. A job 
consists of one or more job steps. 

JOBLIB : A special ddname that when 
specified on a DD statement indicates to 
the system that you are defining a private 
library. . 

jobname : The name assigned to a JOB 
statement; it identifies the job to the 
system. 



K: 1024 bytes. 

keyword : A symbol that identifies a 
parameter or subparameter. 

keyword parameter : A parameter that 
consists of a keyword followed by an equal 
sign, followed by a single value or a list 
of subparameters . Keyword parameters must 
follow positional parameters in the operand 
field of a JCL statement, but the keyword 
parameters may appear in any order. 



LABEL parameter : This parameter is used: 
(1) to describe the data set label 
associated with the data set; (2) to 
describe the sequence number of a data set 
that does not reside first on a reel; (3) 
to assign a retention period; (4) to assign 
password protection; and (5) to override 
the OPEN macro instruction (BSAM only) . 
The LABEL parameter is coded a DD 
statement . 



library : 

1. In general, a collection of 
information associated with a 
particular use, and the location of 
which is identified in a directory of 
some type. In this context., see link 
library, private library* system 
library. 

2. Any partitioned data set. 

limit priority : A priority associated with 
every task in an MVT system,, representing 
the highest dispatching priority that the 
task may assign to itself or to any of its 
subtasks. 

link library : A partitioned data set named 
SYSl.LINKLIB. Each member is a processing 
program and is called in the PGM parameter 
on the EXEC statement or in the ATTACH, 
LINK, LOAD, and XCTL macro instructions. 

logical record : A record that is defined 
in terms of the information it contains 
rather than its physical traits. You may 
have to specify the length of the logical 
record to complete the data control block; 
one way to specify this is in the LRECL 
subparameter of the DCB parameter. 

main storage : All addressable storage from 
which instructions can be executed or from 
which data can be loaded directly into 
registers. 

main storage hierarchy support : An option 
that divides main storage into two blocks 
known as hierarchies; hierarchy is 
assigned to processor storage and hierarchy 
1 to the IBM 2361 Core Storage unit. 

master scheduler : The part of the control 
program that responds to operator commands 
and returns required information. 

member : An independent, sequentially 
organized data set identified by a unique 
name in a data set directory. A collection 
of such members is called a partitioned 
data set. 

MFT (multiprogramming with a fixed number 
of tasks) : A control program that provides 
priority scheduling of a fixed number of 
tasks. 
MFT. 



A priority scheduler is used in 



MSGLASS parameter : This parameter is used 
to assign an output class to the system 
messages for your job and is coded on a JOB 
statement. 



MSGLEVEL parameter : This parameter is used 
to indicate what JCL statements and 
allocation/termination messages you want 
displayed as output from your job. This 
parameter is coded on a JOB statement. 
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multiprogramming ; Executing more than one 
job step concurrently. 

mutually exclusive ; The term applied to 
two parameters that cannot be coded on the 
same JCL statement. 

MVT (multiprogramming with a variable 
number of tasks ) ; A control program that 
provides priority scheduling of a variable 
number of tasks. A priority scheduler is 
used in MVT. 

MVT with Model 65 multiprocessing ; An 
extension to MVT. This control program is 
used with the Model 65 Multiprocessing 
System. 

M65MP ; See MVT with Model 65 
multiprocessing. 



name ; A 1- to 8-character term,, beginning 
with an alphabetic or national (#, a, $) 
character, that identifies a data set, a 
JCL statement, a program, or a cataloged 
procedure. 

nonspecific volume request ; A request for 
volumes that allows the system to select 
suitable volumes. This type of request can 
only be made when defining an output data 
set. 



nontemporary data set ; A new data set that 
exists after the job that created it 
terminates . 

NOTIFY parameter ; This parameter indicates 
to the system that a message is to be sent 
to your time sharing terminal when your job 
completes. The NOTIFY parameter is coded 
on the JOB statement. 

null statement ; A JCL statement used to 
mark the end of a job*s control statements 
and data. 



OUTLIM parameter ; This parameter is used 
to specify the maximum number of logical 
records you want included for the output 
data set being routed through the output 
stream. The OUTLIM parameter is coded on a 
DD statement that must also contain the 
SYSOUT parameter. 

output class ; An alphabetic or numeric 
character that characterizes the type of 
output data to be written to a unit record 
device. Each output class is defined by 
the installation. For system messages, you 
indicate the type of output data in the 
MSGCLASS parameter on a JOB statement; for 
output data sets, you indicate the type of 
output data in the SYSOUT parameter on a DD 
statement. 



output listing ; A form that is printed at 
the end of your job that may contain JCL 
statements used by your job, diagnostic 
messages about your job, data sets created 
by your job, or a dump. 

output stream ; Diagnostic messages and 
other output data issued by the operating 
system or the processing program on output 
devices especially activated for this 
purpose by the operator. 

output writer ; A part of the job scheduler 
that writes output data sets onto a system 
output device, independently of the 
programs that produced the data sets. 



PARM parameter ; This parameter is used to 
supply a processing program with 
information it requires at the time the 
program is executed and is coded on an EXEC 
statement. 

parameter ; A variable that is given a 
constant value for a specific process or 
purpose. 

partition : In systems with MFT„ a 
subdivision of the dynamic area of main 
storage set aside for a job step or a 
system task. 

partitioned data set : A collection of 
independent groups of sequential records on 
a direct access volume,, each of which is 
called a member. Each member has unique 
name and is listed in a directory at the 
beginning of the data set. 

PEND statement : A JCL statement used to 
mark the end of an in-stream procedure. 

PGM parameter ; This parameter appears as 
the first parameter on an EXEC statement 
when you want to execute a particular 
program. 

physical record ; A record that is defined 
in terms of physical qualities rather than 
by the information it contains (logical 
record) . 

positional parameter ; A parameter that 
must precede all keyword parameters in the 
operand field of a JCL statement. 
Positional parameters must appear in a 
specified order. 

primary quantity ; The initial amount of 
space on a direct access volume that you 
request in the SPACE, SPLIT, or SUBALLOC 
parameter. 

priority : A rank assigned to each job step 
that determines the order in which job 
steps are selected for execution and 
requests for resources are satisfied. 
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priority scheduler : A scheduler that 
processes complete jobs according to their 
initiation priority within job classes. 
Priority schedulers can accept input data 
from more than one input stream. 



private : The term applied to a mounted 
volume that the system cannot allocate to 
an output data set for which a nonspecific 
volume request is made. A private volume 
is demounted after its last use in a job 
step. 

private library : A partitioned data set 
whose members are not used often enough to 
warrant their inclusion in the link 

library. To execute a program that resides 
on a private library, you must define that 
library on a DD statement that has the 
ddname JOBLIB or STEPLIB. 

PROC parameter : This parameter appears as 
the first parameter on an EXEC statement 
when you want to call a particular 
cataloged or in-stream procedure. 

PROC statement : A JCL statement used in 
cataloged or in-stream procedures. It can 
be used to assign default values for 
symbolic parameters contained in a 
procedure. For in-stram procedures, it is 
used to mark the beginning of the 
procedure. 

procedure step : That unit of work 
associated with one processing program and 
related data within a cataloged procedure. 
A cataloged procedure consists of one or 
more procedure steps . 

processing program : Any program capable of 
operating in the problem program mode. 
This includes IBM-distributed language 
processors, application programs, service 
and utility programs, and user-written 
programs. 

PRTY parameter : This parameter is used to 
indicate the job's initiation priority 
within its job class and is coded on a JOB 
statement . 

public : The term applied to a mounted 
volume that the system can allocate to an 
output data set for which a nonspecific 
volume request is made. A public volume 
remains mounted until the device on which 
it is mounted is required by another 
volume . 



RD parameter : This parameter is used to 
define the type of restart that can occur 
and is coded on a JOB or EXEC statement. 

reader /interpreter : A job scheduler 
function that analyzes an input stream of 
JCL statements. 

record : A general term for any unit of 
data that is distinct from all others- 
region: In systems with MVT, a subdivision 
of the dynamic area of main storage set 
aside for a job step or a system task. You 
can specify in the REGION parameter, of the 
JOB statement or EXEC statement, how large 
this area of main storage should be. 



REGION parameter : This parameter is used 
to specify how much contiguous main storage 
is required to execute a job step and can 
be coded on a JOB or EXEC statement. If 
main storage hierarchy support is included 
in the system, the REGION parameter is also 
used to identify the hierarchy or 
hierarchies in which the storage is to be 
allocated. 

resource : Any facility of the computing 
system or operating system required by a 
job or task and inlcudes main storage, 
input/output devices, the CPU, data sets, 
and control and processing programs. 

restart : The process of resuming a job 
after it abnormally terminates. When a 
restart is performed,, processing is 
continued either at the beginning of a job 
step that caused the abnormal termination 
or at a checkpoint within this job step. 

RESTART parameter : This parameter is used 
to identify the step, or the step and the 
checkpoint within the step at which 
execution of a job is to be resumed and is 
coded on the JOB statement of a resubmitted 
job that is to use the checkpoint /re start 
facilities. 

ROLL parameter : This parameter is used to 
specify a job step's ability to be rolled 
out or to cause rollout of another job step 
and is coded on a JOB or EXEC statement. 

rollout/rollin : An optional MVT control 
program feature that allows the temporary 
assignment of additional main storage to a 
job step. 



qualified name : A data set name that is 
composed of multiple names separated by 
periods (e.q.„ A. B.C.. ). For a cataloged 
data set, each* name but the last 
corresponds to an index level in the 
catalog. 



scheduler : See job scheduler. 

secondary quantity : The additional amount 
of space on a direct access volume that you 
want allocated to a data set if the primary 
quantity requested in the SPACE, SPLIT, or 
SUBALLOC parameter is not sufficient. 
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secondary storage : See auxiliary storage. 

SEP parameter ; This parameter is used to 
request channel separation from specific 
data sets defined earlier in the job step 
and can be coded on a DD statement. 

Shared control ; This means that jobs that 
are executing simultaneously with a job 
step that specifies SHR for a data set can 
use that data set. 

sequential data set ; A data set whose 
records are organized on the basis of their 
successive physical positions, such as they 
are on magnetic tape. 

SPACE parameter ; This parameter is used to 
indicate how much space should be allocated 
on a direct access volume for a new data 
set and is coded on a DD statement. 

specif ic volume request ; A request for 
volumes that informs the system of the 
volume serial numbers. 

SPLIT parameter : This parameter is used to 
allocate space to two or more new data sets 
that are to share cylinders. The SPLIT 
parameter is coded on a DD statement. 

STEPLIB : A special ddname that when 
specified on a DD statement indicates to 
the system that you are defining a private 
library. 

stepname ; The name assigned to an EXEC 
statement; it identifies a job step within 
a job. 

step restart ; A restart at the beginning 
of a job step that abnormally terminates. 
The restart may be automatic (depending on 
an eligible completion and the operator's 
consent) or deferred, where deferred 
involves resubmitting the job and coding 
the RESTART parameter on the JOB statement 
of the resubmitted job. 



SUBALLOC parameter : This parameter is used 
to place a series of a new data sets in one 
area of contiguous space on a direct access 
volume and in a certain sequence. The 
SUBALLOC parameter is coded on a DD 
statement . 

subpar amet er : One of the items of variable 
information that follows a keyword 
parameter and can be either positional or 
keyword. 

storage volume : The main function of a 
storage volume is to contain nonteraporary 
data sets for which a nonspecific volume 
request was made and PRIVATE was not coded 
in the VOLUME parameter. A direct access 
volume becomes a storage volume when so 



indicated in a MOUNT command or in a member 
of SYS1.PARMLIB named PRESRES. 



symbol : In the IBM System/ 360 Operating 
System, any group of eight or less 
alphameric and national characters that 
begins with an alphabetic or national 
(#,&,$) character. 



symbolic parameter : A symbol preceded by 
an ampersand that appears in a cataloged 
procedure. Values are assigned to symbolic 
parameters when the procedure in which they 
appear is called. 



SYSABEND: A special ddname that when 
specified on a DD statement tells the 
system you are defining a data set on which 
a dump can be written if the step 
abnormally terminates. The dump provided 
includes the system nucleus, the processing 
program storage area, and a trace table. 

SYSCTLG : The name of a system data set 
that contains the name and location of 
cataloged data sets. 

SYSCHK ; A special ddname that when 
specified on a DD statement that precedes 
the first EXEC statement in the job tells 
the system you are defining a data set that 
contains checkpoint entries. This DD 
statement is included in a job that is 
being resubmitted for execution and 
execution is to begin at a particular 
checkpoint. 

SYSIN: A name conventionally used as the 
data definition name of a data set in the 
input stream. 

SYSOUT parameter : This parameter is used 
to assign an output class to an output data 
set and can be coded on a DD statement. 

system data sets : The data sets that make 
up the IBM System/360 Operating System. 

system generation ; The process of 
producing an operating system made up of 
standard and optional components. 

system input device . A device specified as 
a source of an input stream. 

system library : A partitioned data set 
which is one of the collection of system 
data sets at an installation. 



system management facilities : An optional 
control program feature that provides the 
means of gathering and recording 
information that can be used to evaluate 
system usage. 
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system messages ; Messages issued by the 
system that pertains to a problem program. 
These messages appear on an output listing 
and may include such messages as error 
messages, disposition messages, and 
allocation/ de-allocation messages. 

system output device : An output device, 
shared by all jobs, onto which specified 
output data is written. 

SYSUDUMP : A special ddname that when 
specified on a DD statement tells the 
system you are defining a data set on which 
a dump can be written if the step 
abnormally terminates. The dump provided 
is the processing program storage area. 

SYS1.LINKLIB : The name of a partitioned 

system data set that contains the 

IBM- supplied processing programs and part 

of the nonresident portion of the control 

program. It may also contain user-written 

programs. 

SYS1.PR0CLIB : The name of a partitioned 
system data set that contains cataloged 
procedures. 

SYS1.SYSJOBQE : A system data set that 
contains information about the input and 
output streams, and contains the input and 
output queues. 



task: 



The smallest unit of work that can 



be performed under the control program. 

temporary data set : A new data set that is 
created and deleted in the same job. 

TERM parameter : This parameter is used to 
indicate to the system that the input or 
output data being defined is coming from or 
going to a time sharing terminal. 

termination : The process of performing 
disposition processing, as specified in the 
DISP parameter, de- allocating input/output 
devices, and supplying control information 
for writing job output on a system output 
unit. 

TIME parameter : This parameter is used to 
assign a time limit on how long the job or 
a particular job step can use the CPU and 
is coded on a JOB or EXEC statement, or 
both. 

Time Sharing Option (TSO) : An optional 
configuration of the operating system 
providing conversational time sharing from 
remote terminals. 



time sharing : A method of using a 
computing system that allows a number of 
users to execute programs concurrently and 
to interact with them during execution. 



time-slicing : The sharing or the CPU by 
certain tasks for an equal,, predetermined 
length of time. 

TYPRUN parameter : This parameter is used 
to hold for execution until the operator 
issues a RELEASE command and is coded as 
TYPRUN=HOLD on a JOB statement. 



UCS parameter : This parameter is used to 
describe the character set you want to use 
for printing an output data set on a 1403 
printer. The UCS parameter is coded on a 
DD statement. 

unit address : A 3 -byte number,, made up of 
the channel, control unit,, and unit 
numbers, that identifies a particular 
device. Coding a unit address in the UNIT 
parameter is one way of indicating what 
input/output device you want allocated to 
the job step. 

UNIT parameter : This parameter is used to 
describe what device and how many devices 
you want assigned to a data set. The UNIT 
parameter can be coded on a DD statement. 



V format : A data set format in which 
logical records are of varying length and 
include a length indicator; and in which V 
format logical records may be blocked, and 
each block containing a block length 
indicator. 

VOL parameter : This parameter is used to 
identify the volume (s) on which a data set 
resides or will reside and is coded on a DD 
statement. Coding VOL is the same as 
coding VOLUME. 

volume : That portion of an auxiliary 
storage device that is accessible to a 
single read/write mechanism. 

VOLUME parameter : This parameter is used 
to identify the volume (s) on which a data 
set resides or will reside and is coded on 
a DD statement. Coding VOLUME is the same 
as coding VOL. 

volume table of contents (VTOC) : A table 
in a direct access volume thatdescribes 
each data set on the volume. 
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Indexes to systems reference library 
manuals are consolidated in the publication 
IBM System/ 3 60 Operating System: Systems 
Reference Library Master Index . Order No. 
GC28-6644. For additional information 
about any subject listed below, refer to 
other publications listed for the same 
subject in the Master Index. 

Where more than one page reference is 
given, the major reference is first. 



♦parameter 183-184, 408 
/*■ statement 

(See delimiter statement) 
% subparameter of SPLIT parameter 
162-163,405 



ABEND dump, data set for 257-258 
abnormal termination dump 257-258 
ABSTR subparameter of SPACE parameter 
for creating data set 

direct access devices 160-161,405 
indexed sequential data set 372 
account number 44-45 
accounting information 
EXEC statement 69-70 
JOB statement 44-45 
ACCT parameter 69-70 
address of direct access devices 139 
address subparameter of SPACE parameter 
for creating data set 

direct access devices 160-161 
indexed sequential data set 372 
AFF parameter 

for creating data set 

direct access devices 172^406 
magnetic tape 131,403 
for extending existing data set 
cataloged data set 236-237,413 
kept data set 248 ,414 
for retrieving existing data set 
cataloged data set 205,410 
kept data set 214-215,411 
AFF subparameter of UNIT parameter 
for extending existing data set 
cataloged data set 232,413 
kept data set 242,414 
for retrieving existing data set 
cataloged data set 197,410 
kept data set 210-211,411 
AL subparameter in the LABEL parameter 
for creating data set 

direct access devices 151-152 
magnetic tape 123-124 
for retrieving existing data set 
kept data set 212 
passed data set 190-191 



ALGOL 18 

input deck for 274 

PARM field for EXEC statement 274 

DD statements 275 

cataloged procedures for 344-345 
ALIGN subparameter of FCB parameter 103,400 
alphameric characters 35 
ALX subparameter of SPACE parameter 

159-160,405 
American National Standard COBOL 

input deck for 285 

PARM field of EXEC statement 285-286 

DD statements 287 

cataloged procedures 352-353 
American National Standard labels 

for creating data set 

direct access devices 151-152 
magnetic tape 109-110,124 

for retrieving existing data set 
kept data set 212 
passed data set 191 
ANSI printer control characters 391 
ANSI tape labels 

(See American National Standard labels) 
ASCII magnetic tape 

for creating data set 109-110,124 

DCB subparameters 386-387,389-391 
assembler 18 
assembler E 

input deck for 276 

PARM field of EXEC statement 276 

DD statements 277 

cataloged procedures 346-347 
assembler F 

input deck for 278 

PARM field of EXEC statement 278 

DD statement 279 

cataloged procedures 348-349 
AUL subparameter in the LABEL parameter 

for creating data set 

direct access devices 151-152 
magnetic tape 124 

for retrieving existing data set 
kept data set 212 
passed data set 191 

background job 417 
backward reference 36 
BFALN, DCB subparameter 385 
BFTEK, DCB subparameter 385 
BLKSIZE, DCB subparameter 386 
block allocation 

rules for 155 
block length subparameter of SPACE 
parameter 

for creating data set 

direct access devices 158,406 
for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 226,412 
for reserved area 163,406 
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block length subparameter of SPLIT 

parameter 162 
block length subparameter of SUBALLOC 

parameter 164 
block size 155 

BLP subparameter of LABEL parameter 
for creating data set 

magnetic tape 125,403 
for extending existing data set 
cataloged data set 234, 413 
kept data set 245,414 
passed data set 225,412 
for retrieving existing data set 
cataloged data set 199,410 
kept data set 212,411 
passed data set 191,409 

braces 

meaning 37 
brackets 

meaning 37 
BUFL,, DCB subparameter 386 
BUFNO, DCB subparameter 386 
BUFOFF, DCB subparameter 386-387 
bypass I/O operations for magnetic tape 

data sets 131-132 
bypass label parameter 

(See BLP subparameter of LABEL 
parameter) 



capabilities of Job Control Language 28-29 
cataloged and in-stream procedures 317-341 
cataloged data set 

extending 218,229-238 
retrieving 176,194-206 
(See also CATLG subparameter of DISP 
parameter) 
cataloged procedures 
adding 341 
assigning values to symbolic parameters 

319 
calling 318 
contents 337 
DD statements 

overriding parameters on 327-329 
adding parameters to 330 
nullifying parameters on 330-331 
overriding concatenated data sets 

333-334 
adding DD statements 334 
definition 22,27 
examples for compilations, link edits 

and executions 343-364 
EXEC statement 

overriding parameters 324-325 
adding parameters 325 
nullifying parameters 326 
listing 47 
modifying 341 
PROC statement 267-268 
using 318-336 
symbolic parameter 33 
writing 337-341 
CATLG subparameter of DISP parameter 
for creating data set 

direct access devices 135-136, 404 
indexed sequential data set 369 
magnetic tape 111-112,393 



CATLG subparameter of DISP parameter 
(continued) 

for extending existing data set 
cataloged data set 230,413 
indexed sequential data set 376 
kept data set 239,414 
passed data set 221-222 
for retrieving existing data set 
indexed sequential data set 376 
kept data set 207,411 
passed data set 188-189,409 
channel affinity 131 
channel s eparat ion 

(See SEP parameter) 
shortcut method 
(See AFF parameter) 
character sets 
alphameric 35 
national 35 
special 35 
checkpoint data set, defining 258-260 
checkpoint/restart for a job 42,56-57 
RD parameter 57-58 
RESTART parameter 59 
checkpoint/restart for a job step 72,94-96 

RD parameter 95-96 
classifying jobs 28-29 
CLASS parameter 52 
classes* job 28-29,52 
classnames 

for output classes 107 
COBOL 18 
COBOL E 

input deck for 280 
PARM field of EXEC statement 280 
DD statements 281 
catloged procedures 350 
COBOL F 

input deck for 282 

PARM field of EXEC statement 282^283 
DD statements 284 
cataloged procedures 351 
CODE, DCB subparameter 387 
coding conventions 31-39 
coding form 39 
coding special characters 35 
command statement 270-272 
definition 23 
for MFT 270-271 
for MVT 272 
commands 23 

jobname restrictions 43-44 
comment statement 266 

definition 23 
comments field 

how to continue 34 
comments , writing 266 
compilers 
ALGOL 

cataloged procedures 344-345 
JCL for 274-275 
American National Standard COBOL 
cataloged procedures 352-353 
JCL for 285-287 
Assembler E 

cataloged procedures 346-347 
JCL for 276-277 
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compilers (continued) 
Assembler F 

cataloged procedures 348-349 
JCL for 278-279 
COBOL E 

cataloged procedures 350 
JCL for 282-283 
COBOL F 

cataloged procedures 351 
JCL for 282-284 
FORTRAN E 

cataloged procedures 354-355 
JCL for 288-290 
FORTRAN G 

cataloged procedures 356-357 
JCL for 291-292 
FORTRAN H 

cataloged procedures 358-359 
JCL for 293-295 
PL/I F 

cataloged procedures 360-362 
JCL for 296-299 
concatenated data set 
glossary 417 
overriding 333 
COND parameter 

EXEC statement 70-76 
JOB statement 48-50 
conditions for job termination 48-49 
CONTIG subparameter of SPACE parameter 
for creating data set 

direct access devices 159,405 
indexed sequential data set 371 
for reserved area 163,, 406 
continuing JCL statements 34 
control program 

data management 19 
job management 19 
task management 19 
control program configurations 
MFT 20-21 
MVT 20-21 
CPU time used 
by job 51 
by job step 76-77 
creating a new data set 

direct access devices 132-178,404-406 
indexed sequential data set 365-373 
magnetic tape 109-132,402-403 
parameters for 94 
unit record devices 95-103,400 
system output devices 106-109,401 
CYL subparameter of SPACE parameter 
for creating data set 

direct access devices 158,405 
indexed sequential data set 371 
for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 226,412 
for reserved area 163,406 
CYL subparameter of SPLIT, parameter 

162, 405 
CYL subparameter of SUBALLOC parameter 

164,406 
cylinder capacities 156 
CYLOFL, OCB subparameter 387 



data 

definition 23 
in input stream 25 
data attributes 

for creating data set 

direct access devices 165-170,406 
indexed sequential data set 372-373 
magnetic tape 126-129,403 
unit record devices 96-100,400 
system output devices 108-109,401 
for extending existing data set 
cataloged data set 235,413 
indexed sequential data set 377-378 
kept data set 246,414 
passed data set 227-228,412 
for overwriting indexed sequential data 

set 3 80 
for postponing definition of data set 

260-261,415 
for retrieving existing data set 

indexed sequential data set 377-378 
input stream data set 185-186,408 
kept data set 213,411 
passed data set 191-193,409 
unit record device data set 
178-182,407 

(Also see, DCB parameter) 
data definition statement 

(See DD statement) 
DATA parameter 

for retrieving data from input stream 
185,408 
data set 

postponing definition of 260-263,415 
data set disposition 

(See DISP parameter) 
data set information 

for creating data set 

direct access devices 133-139,404 
indexed sequential data set 368-369 
magnetic tape 110-114,402 
for extending existing data set 
cataloged data set 229-230,413 
indexed sequential 
data set 375-376 
kept data set 238-239,414 
passed data set 220-223,412 
for overwriting indexed sequential data 

set 379 
for retrieving existing data set 
cataloged data set 194-195,410 
indexed sequential 
data set 375-376 
kept data set 206-2 07,411 
passed data set 186-189,409 
(Also see DISP parameter; DSNAME 
parameter) 
data set on direct access devices 
data set information 133-139 
types of data sets 133 
temporary 133-135 
nontemporary 135-139 
location of data set 139-153 
size of data set 153-165 
data attributes 165-170 
special processing options 171-173 
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data set on magnetic tape 109-132 
data set information 109-114 
types of data sets 110 

temporary 110-111 

non-temporary 111-114 
location of data set 114-126 
data attributes 126-129 
special processing options 129-132 
data set name (See DSNAME parameter) 
data set protection 

for direct access devices 152 
for magnetic tape 126 
DCB parameter 

for creating data set 

direct access devices 165-170,406 

indexed sequential data set 372-373 

magnetic tape 126-129,403 

unit record devices 96-100,400 

system output devices 108-109,401 
for extending existing data set 

cataloged data set 235,413 

indexed sequential data set 377-378 

kept data set 246,414 

passed data set 227-228,412 
for overwriting indexed sequential data 

set 380 
for postponing definition of data set 

260-261,415 
for retrieving existing data set 

cataloged data set 199-203,410 

indexed sequential data set 377-378 

input stream data set 185, 408 

kept data set 213,411 

passed data set 191-193,409 

unit record device data set 
178-182,407 
DCB subparameters 

for creating data set 

card punch 97 

direct data set 167 

indexed sequential data set 373 

magnetic tape 128 

partitioned data set 168 

printer 96 

sequential data set on direct access 
devices 166 
for overwriting indexed sequential data 

set 380 
for postponing definition of data set 

261, 415 
for retrieving existing data set 

card reader 179 

direct data set 202 

indexed sequential data set 378 

magnetic tape 200 

paper tape reader 180 

partitioned data set 203 

sequential data set on direct access 
device 201 
glossary of 385-393 
DD statement 

adding DD statements 334 

examples of 335-336 
adding parameters to 330 

examples of 332 
definition 23,85-89 



DD statement (continued) 

for creating data set 
direct access devices 

132-173,404-406 
indexed sequential 
data set 365-373 
magnetic tape 109-132,402-403 
unit record devices 95-103,400 
system output devices 106-109,401 

for extending existing data set 
cataloged data set 229-238,413 
indexed sequential data set 374-378 
kept data set 238-249,414 
passed data set 219-229,412 

for overwriting indexed sequential data 
set 379-380 

for retrieving existing data set 
cataloged data set 194-206,410 
indexed sequential data set 374-378 
input stream data set 183-186,408 
kept data set 206-215,411 
passed data set 186-193,409 
unit record device data set 
177-182,407 

functions 85-87 

maximum number of 85 

naming 91 

nullifying parameters on 330-331 
examples of 332-333 

overriding concatenated data sets 
333-334 

overriding parameters on 327-329 
examples of 332-333 
parameters for 88-89 
postponing definition 260-263,415 
special DD statements 250-260 
summary 399-415 
parameters 88-89 

symbolic parameters 267-268 
assigning values 319 
definition 33 
nullifying 321 
using 338-340 
ddname 85,91 

within jobstep 91 

duplicate 91 
DDNAME parameter 260-261,415 
DEFER subparameter of UNIT parameter 

for creating data set 

magnetic tape 116,402 

for extending existing data set 
cataloged data set 231,413 
kept data set 241,414 
passed data set 224,412 

for retrieving existing data set 
cataloged data set 196,410 
kept data set 210,411 
deferred mounting 

(See DEFER subparameter of UNIT 
parameter) 
defining your job 25 
DELETE subparameter of DISP parameter 

for creating data set 

direct access devices 133-139,404 
indexed sequential data set 369 
magnetic tape 110-114,402 
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DELETE subparameter of DISP parameter 
(continued) 

for extending existing data set 
cataloged data set 230,413 
indexed sequential 

data set 376 
kept data set 239,414 
passed data set 221-222,412 
for overwriting indexed sequential data 

set 379 
for retrieving existing data set 
cataloged data set 195,410 
indexed sequential 

data set 376 
kept data set 207,411 
passed data set 188-189,409 
deleting a data set 

(See DELETE subparameter of DISP 
parameter) 
delimiter statement 23,264 
DEN, DCB subparameter 387 
device independence in space allocation 

155 
device type subparameter of UNIT parameter 
for creating data set 

direct access devices 140,404 
indexed sequentail data set 369 
magnetic tape 115,402 
unit record devices 95-96,400 
for extending existing data set 

indexed sequential data set 376 
kept data set 240,414 
for retrieving existing data set 
indexed sequential data set 376 
kept data set 208-209,411 
unit record device data set 177,407 
direct access device 
capacities 156 

creating a new data set on 94,, 132-173 
types of data set 132-133 
direct data set on direct access devices 

132 
directory quantity 
definition 155 
directory subparameter of SPACE parameter 

158,160-161,405 
directory subparameter of SUBALLOC 

parameter 164,406 
direct system output processing 106 
DISP parameter 

for creating data set 

direct access devices 133-138,404 
indexed sequential data set 369 
magnetic tape 110-114,402 
for extending existing data set 
cataloged data set 23 0,413 
indexed sequential data set 37 5-376 
kept data set 230,414 
passed data set 221-222,412 
for overwriting indexed sequential data 

set 379 
for retrieving existing data set 
cataloged data set 195,410 
indexed sequential data set 375-376 
kept data set 207,411 
passed data set 188-189,409 
disposition 

(See DISP parameter) 



DPRTY parameter 77 

format 77 

values 77 
dsname 

(See DSNAME parameter) 
DSNAME parameter 

for creating data set 

direct access devices 133-138,404 
indexed sequential data set 368 
magnetic tape 110-114,402 

for extending existing data set 
cataloged data set 229-230,404 
indexed sequential data set 375 
kept data set 238,414 
passed data set 220-221,412 

for overwriting indexed sequential data 
set 379 

for retrieving existing data set 
cataloged data set 194-195,410 
indexed sequential data set 375 
kept data set 206-207,411 
passed data set 186-188,409 
DSORG, DCB subparameter 3 87 
DUMMY parameter 

for creating data set 

direct access devices 173,406 
magnetic tape 131-132,403 
unit record devices 103,400 

for extending existing data set 
cataloged data set 237,413 
kept data set 248-249,414 
passed data set 228-229,412 

for retrieving existing data set 
cataloged data set 205-206,410 
kept data set 215,411 
passed data set 193,409 
unit record device data set 
182-183,407 
dumps, data sets for 257-258 
DYNAM parameter 89 

for creating data set 94 

direct access devices 173,171 

for extending existing data set 218 
cataloged data set 238, 235 
kept data set 249,246 

for retrieving existing data set 176 
cataloged data set 206,199 
kept data set 215,213 

glossary 418, 424 

nullifying 331 



end Of data, marking 264 
end of job, marking 265 
EROPT, DCB subparameter 388 
examples 

how to find 3 
examples of cataloged procedures for 
compilations, link edits, and executions 
343-364 
exclusive control 

for creating data set 

direct access devices 135-136 
for extending existing data set 
cataloged data set 230 
kept data set 239 
passed data set 222 
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exclusive control (continued) 

for retrieving existing data set 
cataloged data set 195 
kept data set 207 
passed data set 188-189 

glossary 419 
EXEC statement 

ACCT parameter 81-82 

adding parameters to 325 
examples of 326-327 

checkpoint/restart 82-84 

COND parameter 70-76 

definition 22 

DPRTY parameter 77-78 

main storage options 78-82 

installation management information on 
81-82 

naming the step 63 

nullifying parameters 326 
examples of 326-327 

overriding parameters on 324-325 
examples of 326-327 

parameters for 60 

PARM parameter 67-69 

PGM parameter 64 

PROC parameter 66-67 

processing options 70-77 

processing program information 63 

queuing option 77-78 

RD parameter 83-84 

REGION parameter 79-81 

ROLL parameter 81-82 

symbolic parameter 33,267-268 

TIME parameter 76-77 
execute statement 

(See EXEC statement) 
execution, order of 

(See job priority) 
existing data set 

(See OLD subparameter of DISP 
parameters ) 
EXPDT subparameter of LABEL parameter 

for creating data set 

direct access data set 151-153,405 
magnetic tape 126,403 
expiration date 

for direct access devices 151-153 

for magnetic tape 126 
extending on existing data set 219-249 

cataloged data set 229-238,413 

kept data set 238-249,414 

parameters for 218 

passed data set 219-229,412 

restrictions 219 



FCB parameter 

for creating data set 

unit record devices 102-103,94,400 
glossary 419 
FOLD subparameter of UCS 

parameter 102, 400 
form number 107 
form number subparameter in SYSOUT 

parameter 107,401 
FORTRAN 18 



FORTRAN E 

input deck for 288 

PARM field of EXEC statement 287 

DD statements 290 

cataloged procedures 354-355 
FORTRAN G 

input deck for 291 

PARM field of EXEC statement 291 

DD statements 292 

cataloged procedures 356-357 
FORTRAN H 

input deck for 293 

PARM field of EXEC statement 294 

DD statements 295 

cataloged procedures 358-359 



generation data sets 

on direct access devices 133 
on magnetic tape 113-114 
group name subparameter of UNIT parameter 
for creating data set 

direct access devices 140,404 

indexed sequential data set 370 

magnetic tape 115,402 

unit record devices 96,400 
for extending existing data set 

indexed sequential data set 376 

kept data set 241,414 
for retrieving existing data set 

indexed sequential data set 376 

kept data s et 209,411 

unit record device data set 178,407 



HIARCHY, DCB subparameter 
hierarchies, storage 

(See REGION parameter) 



388 



identification field 
definition 31-32 
init iator/terminator 1 9-2 
in-stream procedures 

assignming values to symbolic 

parameters 319 
calling 318-319 
contents 337 
DD statement 

adding DD statements 334 
adding parameters to 330 
nullifying parameters on 330-331 
overriding concatenated data sets 

333-334 
overriding parameters on 327-329 
definition 23, 27 
EXEC statement 

nullifying parameters 326 
adding parameters 325 
overriding parameters 324-325 
PROC statement 267-268 
PEND statement 269 
using 318-336 
why use 337 
writing 337-341 
IN subparameter of LABEL parameter 
for creating data set 

direct access devices 152,405 
magnetic tape 125,403 
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index area 

definition 365 
index subparameter of SPACE parameter 

371-372 
indexed sequential data sets 365-38 4 

creating 365-373 

parameters for 366-367 

definition 365 

examples 381-384 

extending 374-378 

parameters for 374-375 

overwriting 379-380 

retrieving 374-378 

parameters for 374-375 
input deck 

comments 266 
input stream 

definition 27 

number of 20-21 

example of 22 

restrictions 20-21 

retrieving a data set from 
176,183-186,408 
input stream data 183-186 
input unit 

for input stream 27 
installation management information 

EXEC statement 60,69-70 

JOB statement 42,44-46 
introduction 17-29 



JCL 

definition 17 

for compilers, linkage editor, and 
loader 273-316 
JCL statements 

(Also see,, command statement; comment 
statement; DD statement; delimiter 
statement,, EXEC statement; JOB 
statement; PEND statement; and PROC 
statement) 

as input data 185 

backward references 36 

coding form for 39 

comments field 32 

definition 21 

facilities 28-29 

fields 31-32 

fields spacing 33 

how to continue 34 

identification field 31-32 

introduced to system 
(See input stream) 

listing of 46 

name field 31-32 

notation for describing 37-38 

operand field 31-32 

operation field 31-32 

purpose 17 

rules for coding 

( See coding c onve nti ons ) 

why catalog 337 
job 

definition 17 

division of a 

(See job step) 

example 25-26 



job (continued) 

in input stream 27 

processing 27-28 

reducing its size 26-27 
job boundaries 21-22 
job classes 28-29 
job control language 

(See JCL) 
job control statements 

(See JCL statements) 
job execution, delaying 50,48 
job execution 

time limit 51,48 
job libraries 250-253 

concatenating 252 
job mix, balancing 52-53,21 
job priorities 28-29 
job scheduler 19-20 

initiator /terminator 19-20 

output writer 19-20 

reader interpreter 19-2 
JOB statement 43-59 

accounting information parameter 44-45 

CLASS parameter 52 

COND parameter 49-50 

definition 21 

functions 43 

installation management information 
44-46 

main storage options 53-56 

MSGCLASS parameter 48 

MSGLEVEL parameter 47-48 

name field 43-44 

operating system messages 46-48 

parameters for 42 

processing options 48-51 

programmer's name parameter 46 

PRTY parameter 52-53 

REGION parameter 54-55 

RESTART parameter 59 

RD parameter 57-58 

ROLL parameter 55-56 

TIME parameter 51 

TYPRUN parameter 50 
job step 

boundaries 22,24 

definition 18 

(Also see EXEC statement) 
JOBLIB DD statement 91,250-253 
jobname 43-44 



KEEP subparameter of DISP parameter 

for creating data set 

direct access devices 135-137,404 
indexed sequential data set 369 
magnetic tape 111-113,4 02 

for extending existing data set 

indexed sequential data set 376 
kept data set 239,414 
passed data set 221-222,412 

for overwriting indexed sequential data 
set 379 

for retrieving existing data set 
indexed sequential data set 376 
kept data set 207,411 
passed data set 188-189,409 
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kept data set 

extending 218,238-249,414 

retrieving 206-215,411 

(Also see KEEP subparameter of DISP 
parameter) 
keyword parameters 

definition 32-33 



LABEL parameter 

for creating data set 

direct access devices 151-153,405 
indexed sequential data set 371 
magnetic tape 123-126,403 
for extending existing data set 
cataloged data set 234,413 
kept data set 244-245,414 
passed data set 225,412 
for overwriting indexed sequential data 

set 380 
for retrieving existing data set 
cataloged data set 199,410 
kept data set 212-213,411 
passed data set 190-191,409 
language processors 

(See compiler) 
language translators 18 
linkage editor 18 
JCL for 300-303 
input deck for 300 

PARM field of EXEC statement 300-301 
DD statements 302-303 
LIMCT, DCB subparameter 3 88 
list of subparameter s 33 
loader 18 

JCL for 304-306 
input deck for 304 

PARM field of EXEC statement 304-305 
DD statements 306 
load module 18 
location of the data set 
for creating data set 

direct access devices 139-153 
indexed sequential data set 

369-371,404-405 
magnetic tape 114-126,402-403 
unit record devices 95-96,400 
system output devices 106-108,401 
for extending existing data set 
cataloged data set 231-234,413 
indexed sequential data set 376-377 
kept data set 239-245,414 
passed data set 223-225,412 
for overwriting indexed sequential data 

set 379-380 
for retrieving existing data set 
cataloged data set 196-199,410 
indexed sequential data set 376-377 
input stream data set 184-185,408 
kept data set 208-213,411 
passed data set 190-191,409 
unit record device data set 
177-178,407 

(Also see *parameter; DATA parameter; 
LABEL parameter SYSOUT parameter; 
UNIT parameter; VOLUME parameter) 
LRECL, DCB subparameter 389 



magnetic tape 

creating a new data set on 94,109-132 
types of data sets 110 
main storage options 

EXEC statement 60,78-82 
JOB statement 42,53-56 
master scheduler 20 
messages 

allocation/termination 46 
messages operating system 

selection of 46 
MFT 

classes 28-29 
input stream 20 
MOD subparameter of DISP parameter 
for extending existing data set 
cataloged data set 230,413 
indexed sequential data set 375-376 
kept data set 239,414 
passed data set 221-222,412 
MODE, DCB subparameter 389 
MSGCLASS parameter 48 
MSGLEVEL parameter 47 
multi volume data sets 

processing other than first volume 

(See sequence subparameter of VOLUME 
parameter) 
restrictions for direct access devices 
142-143 
MVT 

classes 28-29 
input stream 21 
priorities 28-29 
MXIG subparameter of SPACE parameter 
159,405 



n subparameter of SPLIT parameter 162, 405 
name field 

DD statement 91 
name field 

DD statement 91 
definition 31-32 
EXEC statement 63 
JOB statement 43-44 
naming the DD statement 91 
national characters 35 
NCP, DCB subparameter 389 
NEW subparameter of DISP parameter 
for creating data set 

direct access devices 133-137,404 
indexed sequential data set 369 
magnetic tape 110-114,402 
NL subparameter of LABEL parameter 
for creating data set 

magnetic tape 124-125,4 03 
for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 225,412 
for retrieving existing data set 
cataloged data set 199,410 
kept data set 212,411 
passed data set 191,4 09 
no labels 

(See NL subparameter of LABEL parameter) 
nontemporary data sets 

cataloged 111-112,135-13 6 
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nontemporary data sets (continued) 
kept 112-113,136-137 
member of generation data group 
113-114,138-139 
nonstandard labels 

(See NSL subparameter of LABEL 
parameter) 
NOPWREAD subparameter of the LABEL 
parameter 

for creating data set 

direct access devices 151-152 
magnetic tape 123,125 
notation for parameters 37-38 
NOTIFY parameter 56,42 

glossary 421 
NSL subparameter of LABEL parameter 
for creating data set 

magnetic tape 125,403 
for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 225,412 
for retrieving existing data set 
cataloged data set 199, 410 
kept data set 212,411 
passed data set 191,409 
NTM, DCB subparameter 389 
null statement 23,265 



object module 18 

OLD subparameter of DISP parameter 

for overwriting indexed sequential data 

set 379 
for retrieving existing data set 
cataloged data set 195,410 
indexed sequential data set 376 
kept data set 207,411 
passed data set 188-189,409 
operand field 

how to continue 34 
definition 32 
keyword parameters 33 
parameters in 32 
positional parameters 33 
subparameter list 33 
symbolic parameters 33 
operating system 
messages 42,46 
purpose of 17 
operation field 

definition 32 
operator commands 23 

(Also see command statement) 
operator communication 23 
OPTCD,, DCB subparameter 390-391 
OUT subparameter of LABEL parameter 
for creating data set 

direct access devices 152, 405 
for magnetic tape 125,403 
OUTLIM parameter 109,401 
output class processing 106 
output classes 48,106 
output data set 

(See creating a new data set) 
additional output 

(See extending an existing data set) 



output unit class 46 
output writer 19-20 
overflow area 

definition 365 



P subparameter of UNIT parameter 
for creating data set 

direct access devices 140,404 
indexed sequential data set 370 
magnetic tape 116,402 
for extending existing data set 
cataloged data set 231,413 
indexed sequential data set 376 
kept data set 241,414 
for retrieving existing data set 
cataloged data set 196,410 
indexed sequential data set 376 
kept data set 210,411 
parallel mounting 

(See P subparameter of UNIT parameter) 
parameters 

backward references 36 
JOB statement 42 
keyword 32-33 

notation for describing 37-38 
operand field 32 
positional 32-33 
special characters in 35-36 
symbolic 33 
partitioned data set 
adding members 

(See extending an existing data set) 
directory quantity 155 
on direct access devices 132 
PASS subparameter of DISP parameter 
for creating data set 

direct access devices 133,137,404 
indexed sequential data set 369 
magnetic tape 110-111,113,402 
for extending existing data set 

indexed sequential data set 376 
passed data set 221-222,412 
for retrieving existing data set 
indexed sequential data set 376 
passed data set 188,409 
passed data set 

extending 218,219-229,412 
retrieving a 176,186-193,4 09 
password protection 

for direct access devices 152 
for magnetic tape data sets 125 
PASSWORD subparameter of LABEL parameter 
for creating data set 

direct access devices 151-152,405 
magnetic tape 123,125,403 
PEND statement 269 

definition 23 
performance improvement for space 

allocation 155 
PGM parameter 64-66 
PL/I F 18 

input deck for 296 

PARM field of EXEC statement 296-298 
DD statements 299 
cataloged procedures 360-362 
positional parameters 
definition 32-33 
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postponing definition of a data set 

260-263,415 
precoded JCL statements 

(See cataloged procedures; in-stream 
procedures) 
primary quantity 

definition 154 
primary quantity subparameter of SPACE 
parameter 

for creating data set 

direct access devices 158-161,405 
indexed sequential data set 371-372 
for extending existing data set 
cataloged data set 234,413 
kept data set 246,414 
passed data set 226,412 
for reserved area 163,406 
primary quantity subparameter of SPLIT 

parameter 162,405 
primary quantity subparameter of SUBALLOC 

parameter 164,406 
prime area 

definition 365 
priorities, job 28-29,52-53 
private libraries, data sets for 250-256 
JOBLIB 250-253 
STEPLIB 253-256 
PRIVATE subparameter of VOLUME parameter 
for creating data set 
direct access devices 

143-144,148-149,404-4 05 
indexed sequential data set 370 
magnetic tape 118-121,402-403 
for extending existing data set 
cataloged data set 232-233,413 
kept data set 242,414 
for retrieving existing data set 
cataloged data set 197-198,410 
kept data set 211,411 
private volume 

definition 142 
PROC statement 267-268 
definition 23 
naming the statement 267 
symbolic parameters 267-268 
PROC parameter 66-67 
procedure end statement 
(See PEND statement) 
procedure library 27 
procedure name parameter 66-67 
procedure step (see cataloged procedures, 

in-stream procedures) 
procedures 

(See cataloged procedures, in-stream 
procedures ) 
processing a job 27 
processing options 

EXEC statement 60,70-77 
JOB statement 42,48-52 
processing program information 60,63 
processing programs 17-18 
program name 

for execution 64-66 
for system output devices 107 
program name subparameter of SYSOUT 

parameter 107,401 
programmer's name 44 
PRSTP, DCB subparameter 391 



PRTY parameter 52-53 
public volume 

definition 142 



queuing options 

EXEC statement 60,77 
JOB statement 42,52-53 



RD parameter 

EXEC statement 83-84 
JOB statement 57-58 
reader /interpreter 19-20 
RECFM, DCB subparameter 3 91 
records per track 157 
REF subparameter of VOLUME parameter 
for creating data set 
direct access devices 

146-147,149-151,405 
indexed sequential data set 370 
magnetic tape 121-123,403 
for extending existing data set 

indexed sequential data set 377 
for retrieving existing data set 
indexed sequential data set 377 
REGION parameter 

EXEC statement 79-81 

with storage hierarchies 80 
without storage hierarchies 79 
JOB statement 54-55 

with storage hierarchies 54-55 
without storage hierarchies 54 
restart facilities 
using 393-397 
examples 396-397 
RESTART parameter 59 

RETAIN subparameter of VOLUME parameter 
for creating data set 
direct access devices 

143-144,148,149,404-405 
indexed sequential data set 370 
magnetic tape 119-121,402-403 
for extending existing data set 
cataloged data set 232-233,413 
kept data set 242,414 
for retrieving existing data set 
cataloged data set 198,410 
kept data set 211,411 
retention period 

direct access data sets 15 2-153 
RETPD subparameter of LABEL parameter 
for creating data set 

direct access devices 152-153,405 
magnetic tape 126,403 
retrieving existing data set 177-215 
cataloged data set 194-206,410 
indexed sequential data set 374-378 
input stream data set 182-186,408 
kept data set 206-219,411 
parameters for 176 
passed data set 186-193,409 
unit record device 
data set 177-182,407 
return code 49 
RKP, DCB subparameter 392 
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RLSE subparameter of SPACE parameter 
for creating data set 

direct access devices 159,405 
for extending data set 

cataloged data set 235,413 
kept data set 246,414 
passed data set 226,412 
ROLL parameter 

EXEC statement 81-82 
JOB statement 55-56 
ROUND subparameter of SPACE parameter 

160,405 
routine messages 48 
RPG 18 



secondary quantity 
definition 154 
secondary quantity subparameter of SPACE 
parameter 

for creating data set 

direct access devices 158,405 
for extending existing data set 
cataloged data set 234-235,413 
indexed sequential data set 
kept data set 245-246,414 
passed data set 226,412 
secondary quantity subparameter of SPLIT 

parameter 16 1- 16 2, 40 5 
secondary quantity subparameter of SUBALLOC 

parameter 164, 406 
selection of jobs, controlling 50 
SEP parameter 

for creating data set 

direct access devices 171-172,406 
magnetic tape 129-131,403 
for extending existing data set 
cataloged data set 235-236,413 
kept data set 246-247,414 
for retrieving existing data set 
cataloged data set 204-205,410 
kept data set 213-214,411 
SEP subparameter of UNIT parameter 141,4 04 
sequence subparameter of SPACE parameter 
for extending a cataloged data set 

232-233,413 
for retrieving a cataloged data set 
197-198,410 
sequence subparameter of LABEL parameter 
for creating data set on magnetic tape 

123-124,403 
for retrieving kept data set 212,411 
for extending kept data set 244,414 
sequential data sets on direct access 

devices 132 
SER subparameter of VOLUME parameter 
for creating data set 
direct access devices 

144-145,148,394-395 
indexed sequential data set 370 
magnetic tape 120-121,402 
for extending existing data set 

indexed sequential data set 377 
kept data set 242-244,414 
for retrieving existing data set 
indexed sequential data set 377 
kept data set 211,411 



serial number 

(See SER subparameter of VOLUME parameter) 
service programs 18 

data set utilities 18 
independent utilities 18 
linkage editor 18 
loader 18 
sort/merge 18 
system utilities 18 
TESTRAN 18 
sharing a data set 

(See SHR subparameter of DISP parameter) 
SHR subparameter of DISP parameter 
for retrieving existing data set 
cataloged data set 195,410 
indexed sequential data set 373 
kept data set 207,411 
size of the data set 

for creating data set 
direct access devices 

153-165,405-406 
indexed sequential 
data set 371-372 
system output devices 108,401 
for extending existing data set 
cataloged data set 234-235,413 
kept data set 245-246,414 
passed data set 226,412 
for overwriting indexed sequential data 

set 380 
how to specify 153-155 
(Also see SPACE parameter; SPLIT 
parameter; SUBALLOC parameter) 
SL subparameter of LABEL parameter 
for creating data set 

direct access devices 151-152,405 
magnetic tape 124,403 
sort merge 18 
source module 17 
source program 17 
space allocation 153-165 

absolute track allocation 16 0-161 
contiguous space 159 
examples 154-155 
for device independence 155 
releasing unused space 158-159 
rules for block allocation 155 
split cylinder mode 161-163 
suballocation 163-165 
techniques 153-157 
types of 153-157 
(Also see SPACE parameter; SPLIT 
parameter; SUBALLOC parameter) 
SPACE parameter 

for creating data set 

direct access devices 158-161,405 
indexed sequential 
data set 371-372 
system output devices 108,401 
for extending existing data set 
cataloged data set 234-235,413 
kept data set 245-246,414 
passed data set 226,412 
for reserved area 163,406 
special characters 
coding 35 
definition 35 
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special DD statements 250-260 
checkpoint data set 258-260 
data sets for abnormal termination 

dumps 257-258 
private libraries 250-256 
special processing options 
for creating data set 

direct access devices 171-173,406 
magnetic tape 129-132,403 
unit record devices 100-103,400 
system output devices 109,401 
for extending existing data set 
cataloged data set 235-238,413 
kept data set 246-249,414 
passed data set 228-229,412 
for postponing definition of data set 

260-263,415 
for retrieving existing data set 

cataloged data set 199,204-206,410 
kept data set 213-215,411 
passed data set 193,409 
unit record device data set 
182-183,407 
(Also see AFF parameter; DDNAME 
parameter; DUMMY parameter; OUTLIM 
parameter; SEP parameter; UCS 
parameter) 
split- cylinder mode 153,161-163 
SPLIT parameter 161-163,405 
STACK, DCB subpara meter 392 
standard labels 

(See SL subparameter of LABEL parameters) 
step libraries 253-256 
STEPLIB DD statement 91,253-256 
suballocation 153-154,163-165 
subparameter 

definition 32 
subparameter list 33 
SUL parameter of LABEL parameter 
for creating data set 

direct access devices 151-152,405 
magnetic tape 124,403 
for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 225,412 
for retrieving existing data set 
cataloged data set 199,410 
kept data set 212,411 
passed data set 191,409 
symbolic parameters 267-268 
assigning values 319 

examples 322-323 
definition 33 
nullifying 321 
using 338-340 
SYSABEND DD statement 89,257-258 
SYSCHK DD statement 89,258-260 
SYSOUT parameter 106-107,401 
system management facility 50 
system output devices 106 
creating a new data set 

on 94,106-109,401 
data attributes 108-109 
location of the data set 106-108 
output class processing 93 
size of the data set 108 
special processing option 109 



system output writer 106 
SYSUDUMP DD statement 91,257-258 



tape labels, ANSI 

(See American National Standard labels) 
temporary data set 

duration of the job 110-111,133-134 

duration of the job step 111,134-135 
TERM parameter 89,260 

glossary 424 
terminating jobs 

conditions for 48 
TESTRAN 18 

time limit for jobs 51 
TIME parameter 

EXEC statement 76-78 

JOB statement 51 
Time Sharing Option (TSO) 

(See DYNAM parameter; NOTIFY parameter; 
TERM parameter) 

glossary 417,418,419,421,424 
time sharing 56 

glossary 424 

(See DYNAM parameter; NOTIFY parameter; 
TERM parameter) 
time- si icing 

MFT 52 

MVT 53 
track capacities 156,157 
TRK subparameter of SPACE parameter 

for creating data set 

direct access devices 158,405 

for extending existing data set 
cataloged data set 234,413 
kept data set 245,414 
passed data set 226,412 
for reserved area 163,4 06 
TRK subparameter of SUBALLOC parameter 164 
TRTCH, DCB subparameter 3 92 
TSO (see Time Sharing Option) 
TYPRUN parameter 50 



UCS parameter 101-102,400 
uncataloging a data set 

(See UNCATLG subparameter of DISP 
parameter) 
UNCATLG subparameter of DISP parameter 
for extending existing data set 
cataloged data set 230,413 
indexed sequential data set 376 
for retrieving existing data set 
cataloged data set 195,410 
indexed sequential data set 376 
unit address subparameter of UNIT parameter 
for creating data set 

direct access devices 139,40 4 
indexed sequential data set 369 
magnetic tape 115,402 
unit record devices 95,400 
for extending existing data set 

indexed sequential data set 376 
kept data set 240,414 
for retrieving existing data set 
indexed sequential data set 376 
kept data set 208,411 
unit record device data set 177,407 
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unit affinity 

(See AFF subparameter of UNIT parameter) 
unit count subparameter of UNIT parameter 

for creating data set 

direct access devices 140,404 
indexed sequential data set 3 70 
magnetic tape 116,402 

for extending existing data set 
cataloged data set 231,413 
indexed sequential data set 376 
kept data set 241,414 
passed data set 224,412 

for retrieving existing data set 
cataloged data set 196,410 
indexed sequential data set 376 
kept data set 210,411 
passed data set 190,409 
UNIT parameter 

for creating data set 

direct access devices 139-141,404 
indexed sequential data set 369-370 
magnetic tape 115-117,402 
unit record devices 107-108,400 
system output devices 95-96,401 

for extending existing data set 

indexed sequential data set 376-377 
kept data set 239-242,414 
passed data set 224-225,412 

for overwriting indexed sequential data 
set 379 

for retrieving existing data set 

indexed sequential data set 376-377 
kept data set 208-211,411 
passed data set 190-191,409 
unit record device data set 
177-178,407 
unit record devices 

creating a new data set on 
94,95-103,400 

location of the data set 95-96 

data attributes 95-100 

special processing options 100-103 

retrieving an existing data set from 
176,177-183,407 

data attributes 178-182 
location of the data set 177-178 
special processing option 182-183 
unit separation 

(See SEP subparameter of 
UNIT parameter) 



units used by data set 

(See unit count subparameter of UNIT 
parameter) 
utilities 18 



VERIFY subparameter 

of FCB parameter 103,400 
of UCS parameter 102,400 
volcount subparameter of VOLUME parameter 
for creating data set 

direct access devices 
143,144-145,146,148,149,40 4-40 5 

indexed sequential data set 370 

magnetic tape 118,119,120,121,402-403 
for extending existing data set 

cataloged data set 233,413 

kept data set 242-243,414 

passed data set 224,412 
VOLUME parameter 

for creating data set 

direct access devices 
142-151,404-405 

indexed sequential data set 370 

magnetic tape 117-123,402-403 
for extending existing data set 

cataloged data set 232-234,413 

indexed sequential data set 377 

kept data set 242-244,414 

passed data set 224-225,412 
for overwriting indexed sequential data 

set 380 
for retrieving existing data set 

cataloged data set 197-198,410 

indexed sequential data set 377 

kept data set 211-212,411 
volume requests 

for direct access devices 142-151 

nonspecific request 143-144 

specific request 144-151 
for magnetic tape 117-123 

nonspecific request 117-120 

specific request 120-123 



wait state, limit 51 
writing procedures: cataloged and 
in-stream 337-341 
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